From 23542bbfeecf84bdc13ba2a4ba91adf8a2c3ed37 Mon Sep 17 00:00:00 2001
From: ptitSeb <sebastien.chev@gmail.com>
Date: Mon, 18 Dec 2023 15:56:38 +0100
Subject: [INTERPRETER] Added 64/65 0F BA opcode (for #1146)

---
 src/emu/x64run64.c | 95 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 95 insertions(+)

diff --git a/src/emu/x64run64.c b/src/emu/x64run64.c
index c39ff5e7..9a790cff 100644
--- a/src/emu/x64run64.c
+++ b/src/emu/x64run64.c
@@ -285,6 +285,101 @@ uintptr_t Run64(x64emu_t *emu, rex_t rex, int seg, uintptr_t addr)
                     }
                     break;
 
+                case 0xBA:                      
+                    nextop = F8;
+                    switch((nextop>>3)&7) {
+                        case 4:                 /* BT Ed,Ib */
+                            CHECK_FLAGS(emu);
+                            GETED_OFFS(1, tlsdata);
+                            tmp8u = F8;
+                            if(rex.w) {
+                                tmp8u&=63;
+                                if(ED->q[0] & (1LL<<tmp8u))
+                                    SET_FLAG(F_CF);
+                                else
+                                    CLEAR_FLAG(F_CF);
+                            } else {
+                                tmp8u&=31;
+                                if(ED->dword[0] & (1<<tmp8u))
+                                    SET_FLAG(F_CF);
+                                else
+                                    CLEAR_FLAG(F_CF);
+                            }
+                            break;
+                        case 5:             /* BTS Ed, Ib */
+                            CHECK_FLAGS(emu);
+                            GETED_OFFS(1, tlsdata);
+                            tmp8u = F8;
+                            if(rex.w) {
+                                tmp8u&=63;
+                                if(ED->q[0] & (1LL<<tmp8u)) {
+                                    SET_FLAG(F_CF);
+                                } else {
+                                    ED->q[0] ^= (1LL<<tmp8u);
+                                    CLEAR_FLAG(F_CF);
+                                }
+                            } else {
+                                tmp8u&=31;
+                                if(ED->dword[0] & (1<<tmp8u)) {
+                                    SET_FLAG(F_CF);
+                                } else {
+                                    ED->dword[0] ^= (1<<tmp8u);
+                                    CLEAR_FLAG(F_CF);
+                                }
+                                if(MODREG)
+                                    ED->dword[1] = 0;
+                            }
+                            break;
+                        case 6:             /* BTR Ed, Ib */
+                            CHECK_FLAGS(emu);
+                            GETED_OFFS(1, tlsdata);
+                            tmp8u = F8;
+                            if(rex.w) {
+                                tmp8u&=63;
+                                if(ED->q[0] & (1LL<<tmp8u)) {
+                                    SET_FLAG(F_CF);
+                                    ED->q[0] ^= (1LL<<tmp8u);
+                                } else
+                                    CLEAR_FLAG(F_CF);
+                            } else {
+                                tmp8u&=31;
+                                if(ED->dword[0] & (1<<tmp8u)) {
+                                    SET_FLAG(F_CF);
+                                    ED->dword[0] ^= (1<<tmp8u);
+                                } else
+                                    CLEAR_FLAG(F_CF);
+                                if(MODREG)
+                                    ED->dword[1] = 0;
+                            }
+                            break;
+                        case 7:             /* BTC Ed, Ib */
+                            CHECK_FLAGS(emu);
+                            GETED_OFFS(1, tlsdata);
+                            tmp8u = F8;
+                            if(rex.w) {
+                                tmp8u&=63;
+                                if(ED->q[0] & (1LL<<tmp8u))
+                                    SET_FLAG(F_CF);
+                                else
+                                    CLEAR_FLAG(F_CF);
+                                ED->q[0] ^= (1LL<<tmp8u);
+                            } else {
+                                tmp8u&=31;
+                                if(ED->dword[0] & (1<<tmp8u))
+                                    SET_FLAG(F_CF);
+                                else
+                                    CLEAR_FLAG(F_CF);
+                                ED->dword[0] ^= (1<<tmp8u);
+                                if(MODREG)
+                                    ED->dword[1] = 0;
+                            }
+                            break;
+
+                        default:
+                            return 0;
+                    }
+                    break;
+
                 default:
                     return 0;
             }
-- 
cgit 1.4.1