Changeset 54653 in vbox for trunk/src

Timestamp:

Mar 5, 2015 3:17:54 PM (10 years ago)

Author:

vboxsync

Message:

bootsector2: read CR4 test

Location:

trunk/src/VBox/ValidationKit/bootsectors

Files:

• bootsector2-test1-template.mac (modified) (1 diff)
• bootsector2-test1.asm (modified) (3 diffs)

trunk/src/VBox/ValidationKit/bootsectors/bootsector2-test1-template.mac

@@ -157 +157 @@
         db TMPL_MODE_STR, ', RDTSC', 0
 ENDPROC TMPL_NM(BenchmarkRdTsc_rm)
+
+TMPL_BEGINCODE
+BITS TMPL_BITS
+
+
+;;
+; Run the Read CR4 benchmark for this mode.
+;
+; @uses nothing
+;
+BEGINCODELOW
+BITS 16
+BEGINPROC TMPL_NM(BenchmarkRdCr4_rm)
+        call    TMPL_NM(Bs2IsModeSupported_rm)
+        jz      .done
+        call    TMPL_NM(Bs2EnterMode_rm)
+BITS TMPL_BITS
+        push    xBP
+        mov     xBP, xSP
+        push    sAX
+        push    sBX
+        push    sCX
+        push    sDX
+        push    sDI
+        sub     sSP, 20h
+
+        ; Get the current time.
+        mov     xAX, xSP
+        call    TMPL_NM_CMN(GetNanoTS)
+
+        ; Do the test.
+        mov     edi, TEST_INSTRUCTION_COUNT_READCR4 / 4
+.again:
+        mov     sAX, cr4
+        mov     sAX, cr4
+        mov     sAX, cr4
+        mov     sAX, cr4
+        dec     edi
+        jnz     .again
+
+        ; Calc the elapsed time and report the result.
+        mov     xAX, xSP
+        call    TMPL_NM_CMN(GetElapsedNanoTS)
+
+        mov     xCX, .s_szTestName
+        mov     edx, TEST_INSTRUCTION_COUNT_READCR4
+        mov     xAX, xSP
+        call    TMPL_NM_CMN(ReportResult)
+
+        add     sSP, 20h
+        pop     sDI
+        pop     sDX
+        pop     sCX
+        pop     sBX
+        pop     sAX
+        leave
+
+        call    TMPL_NM(Bs2ExitMode)
+BITS 16
+.done:
+        ret
+
+.s_szTestName:
+        db TMPL_MODE_STR, ', Read CR4', 0
+ENDPROC TMPL_NM(BenchmarkRdCr4_rm)
 
 TMPL_BEGINCODE

trunk/src/VBox/ValidationKit/bootsectors/bootsector2-test1.asm

@@ -37 +37 @@
 ;; The number of RDTSC instructions to test.
 %define TEST_INSTRUCTION_COUNT_RDTSC    4000000
+
+;; The number of RDTSC instructions to test.
+%define TEST_INSTRUCTION_COUNT_READCR4  1000000
 
 ;; The number of instructions to test.
@@ -93 +96 @@
 
         ;
+        ; Read CR4
+        ;
+        mov     ax, .s_szTstRdCr4
+        call    TestSub_r86
+        call    BenchmarkRdCr4_rm_pp32
+        call    BenchmarkRdCr4_rm_pae32
+        call    BenchmarkRdCr4_rm_lm64
+        call    BenchmarkRdCr4_rm_pe16
+        call    BenchmarkRdCr4_rm_pe32
+        call    BenchmarkRdCr4_rm_rm
+
+        ;
         ; I/O port access.
         ;
@@ -128 +143 @@
 .s_szTstRdTsc:
         db      'RDTSC', 0
+.s_szTstRdCr4:
+        db      'Read CR4', 0
 .s_szTstNopIoPort:
         db      'NOP I/O Port Access', 0