Add stub implementation for writes to fs

This is "used" by sbcl.
ish-app · Jan 20, 2024 · 86060cb · 86060cb
1 parent 8bc0bf0
commit 86060cb
Showing 1 changed file with 12 additions and 5 deletions.
diff --git a/emu/decode.h b/emu/decode.h
@@ -804,14 +804,21 @@ __no_instrument DECODER_RET glue(DECODER_NAME, OP_SIZE)(DECODER_ARGS) {
         case 0x8d: TRACEI("lea\t\t"); READMODRM_MEM;
                    MOV(addr, modrm_reg,oz); break;
 
-        // only gs is supported, and it does nothing
-        // see comment in sys/tls.c
+        // we only support fs and gs, and that too not very well.
+        // gs does nothing: see comment in sys/tls.c
+        // for fs, we discard writes. if anyone tries to read we trap
         case 0x8c: TRACEI("mov seg, modrm\t"); READMODRM;
-            if (modrm.reg != reg_ebp) UNDEFINED;
+            if (modrm.reg != 5 /* gs */) UNDEFINED;
             MOV(gs, modrm_val,16); break;
+
         case 0x8e: TRACEI("mov modrm, seg\t"); READMODRM;
-            if (modrm.reg != reg_ebp) UNDEFINED;
-            MOV(modrm_val, gs,16); break;
+            if (modrm.reg == 5 /* gs */) {
+                MOV(modrm_val, gs,16); break;
+            } else if (modrm.reg == 4 /* fs */) {
+                break;
+            } else {
+                UNDEFINED;
+            }
 
         case 0x8f: TRACEI("pop modrm");
                    READMODRM; POP(modrm_val,oz); break;