lodf

ka/main.k

@@ -8,7 +8,15 @@ main:
     jmp bswap_test
 
 bswap_test:
-    mov rdx, 0xFFEEDDCCBBAA99884433
+    mov rdx, 0x1122334455667788
+    bswap rax, rdx
+    
+    mov rdi, 0x1111222233334444
+    wswap rsx, rdi
+
+    mov ax3, 0x1111111122222222
+    dswap ax0, ax3
+    
     ret
 
 ramdev_test:

vm/in/INSTRS

@@ -519,6 +519,22 @@ cmc
 clc
 stc
 
+#
+# Load FLG register (LODF)
+#
+#       $1 = FLG
+#
+lodf rm
+
+#
+# Store FLG register - lower byte only (STOFB)
+#
+#       FLG[7:0] = $1[7:0]
+#
+# Note: FLG's lower byte contains CF, OF, ZF, SF, PF and DF
+#
+stofb rm
+
 #---------------------------------------------------------------------------#
 # Byte-wise / bit-wise manipulation instructions                            #
 #---------------------------------------------------------------------------#
@@ -526,7 +542,7 @@ stc
 #
 # Byte/word/dword swap (xSWAP)
 #
-# Changes endianness
+# Change endianness
 #
 bswap rm rim
 wswap rm rim
@@ -549,6 +565,13 @@ dswap rm rim
 #
 nop
 
+#
+# CPU Identification Number
+#
+# Does nothing (for now)
+#
+cpuid
+
 #
 # Get code/data offset (GCO/GCD)
 #

vm/in/flags.c

@@ -0,0 +1,55 @@
+// The OS/K Team licenses this file to you under the MIT license.
+// See the LICENSE file in the project root for more information.
+
+#include <in/instrs.h>
+
+//----------------------------------------------------------------------------//
+
+IMPL_START_0(cld)
+{
+    flg &= ~DF;
+}
+IMPL_END;
+
+IMPL_START_0(std)
+{
+    flg |= DF;
+}
+IMPL_END;
+
+//----------------------------------------------------------------------------//
+
+IMPL_START_0(cmc)
+{
+    flg = (flg&CF ? flg&~CF : flg|CF);
+}
+IMPL_END;
+
+IMPL_START_0(clc)
+{
+    flg &= ~CF;
+}
+IMPL_END;
+
+IMPL_START_0(stc)
+{
+    flg |= CF;
+}
+IMPL_END;
+
+//----------------------------------------------------------------------------//
+
+IMPL_START_1(lodf)
+{
+    v1 = flg;
+}
+IMPL_OUT;
+
+IMPL_START_1(stofb)
+{
+    flg = (flg & ~0xFF) | (v1 & 0xFF);
+}
+IMPL_END;
+
+//----------------------------------------------------------------------------//
+

vm/in/instrs.c

@@ -24,40 +24,6 @@ IMPL_END;
 
 //----------------------------------------------------------------------------//
 
-IMPL_START_0(cld)
-{
-    flg &= ~DF;
-}
-IMPL_END;
-
-IMPL_START_0(std)
-{
-    flg |= DF;
-}
-IMPL_END;
-
-//----------------------------------------------------------------------------//
-
-IMPL_START_0(cmc)
-{
-    flg = (flg&CF ? flg&~CF : flg|CF);
-}
-IMPL_END;
-
-IMPL_START_0(clc)
-{
-    flg &= ~CF;
-}
-IMPL_END;
-
-IMPL_START_0(stc)
-{
-    flg |= CF;
-}
-IMPL_END;
-
-//----------------------------------------------------------------------------//
-
 IMPL_START_0(clr)
 {
     rax = rbx = rcx = rdx = 0;
@@ -74,3 +40,9 @@ IMPL_END;
 
 //----------------------------------------------------------------------------//
 
+IMPL_START_0(cpuid)
+{
+}
+IMPL_END;
+
+//----------------------------------------------------------------------------//

vm/in/misc.c

@@ -3,6 +3,8 @@
 
 #include <in/instrs.h>
 
+//----------------------------------------------------------------------------//
+
 IMPL_START_2(bswap)
 {
     v1 = ((v2 & 0xFF00000000000000) >> 56)
@@ -18,10 +20,19 @@ IMPL_OUT;
 
 IMPL_START_2(wswap)
 {
+    v1 = ((v2 & 0xFFFF000000000000) >> 48)
+       | ((v2 & 0x0000FFFF00000000) >> 16)
+       | ((v2 & 0x00000000FFFF0000) << 16)
+       | ((v2 & 0x000000000000FFFF) << 48);
 }
 IMPL_OUT;
 
 IMPL_START_2(dswap)
 {
+    v1 = ((v2 & 0xFFFFFFFF00000000) >> 32)
+       | ((v2 & 0x00000000FFFFFFFF) << 32);
 }
 IMPL_OUT;
+
+//----------------------------------------------------------------------------//
+