badpork/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Fast call demo program update

Browse Source 
git-svn-id: svn://kolibrios.org@398 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Iliya Mihailov (Ghost) 2007-03-07 14:11:13 +00:00
parent 9431abc950
commit f1bec30fb2
1 changed files with 54 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

67
programs/develop/fast_call_test/test.ASM
View File

@ -18,23 +18,22 @@ org 0x0
include 'macros.inc'
include 'debug.inc'
START:
mov eax, 19 ; ôóíêöèÿ ïóñòûøêà
push ecx
syscall
pop ecx
print '! Alive !'
START: print 'Please wait'
; ÷åðåç áûñòðûé âûçîâ (SYSENTER)
test1: mov eax, 1
cpuid
test edx, 0x800
jnz .ok
dps 'unsupported '
jmp .end
.ok:
xor eax, eax
cpuid
rdtsc
mov [old_tsc], eax
mov [old_tsc + 4], edx
; ÷åðåç áûñòðûé âûçîâ
test1: mov ebx, 0x100000
mov ebx, 0x100000
mov dword[SYSENTER_VAR], .ret_p
mov [SYSENTER_VAR + 4], esp
align 32
@ -53,17 +52,57 @@ test1: mov ebx, 0x100000
sub edx, [old_tsc + 4]
debug_print_hex edx
debug_print_hex eax
print ' <- Fast call'
.end: print ' <- Fast call (SYSENTER)'
;----------------------------------------------
; ÷åðåç áûñòðûé âûçîâ (SYSCALL)
test2: xor eax, eax
cpuid
cmp ecx, "cAMD"
je .ok
.nf: dps 'unsupported '
jmp .end
.ok: mov eax, 0x80000001
cpuid
test edx, 0x800 ; bit_11 - SYSCALL/SYSRET support
jz .nf
xor eax, eax
cpuid
rdtsc
mov [old_tsc], eax
mov [old_tsc + 4], edx
mov ebx, 0x100000
align 32
.nxt: mov eax, 19
push ecx
syscall
pop ecx
.ret_p: dec ebx
jnz .nxt
xor eax, eax
cpuid
rdtsc
cmp eax, [old_tsc]
jnb @f
dec edx
@@: sub eax, [old_tsc]
sub edx, [old_tsc + 4]
debug_print_hex edx
debug_print_hex eax
.end: print ' <- Fast call (SYSCALL)'
;----------------------------------------------
; ÷åðåç øëþç ïðåðûâàíèÿ
test2: mov ebx, 0x100000
xor eax, eax
cpuid
rdtsc
mov [old_tsc], eax
mov [old_tsc + 4], edx
test3: mov ebx, 0x100000
align 32
.nxt: mov eax, 19 ; ôóíêöèÿ ïóñòûøêà
int 0x40