75 lines
2.7 KiB
PHP
75 lines
2.7 KiB
PHP
;=----------------------------------------------------------------------------=;
|
|
; GNU GPL OS/K ;
|
|
; ;
|
|
; Authors: spectral` ;
|
|
; NeoX ;
|
|
; ;
|
|
; Desc: Kernel (second stage) Loader for OS/K INCLUDED FUNCTIONS ;
|
|
; (x86_64 architecture only) ;
|
|
;=----------------------------------------------------------------------------=;
|
|
[BITS 64]
|
|
|
|
clear:
|
|
;-----------------------------------------------------------------------;
|
|
; x64/LM Clear Text Screen Function ;
|
|
;-----------------------------------------------------------------------;
|
|
mov qword [NextTRAM], TRAM
|
|
mov edi, TRAM
|
|
push rsi
|
|
push rdi
|
|
push rcx
|
|
mov ah, 0
|
|
mov al, 0
|
|
mov rcx, 0x4000 ; traditionnal value
|
|
rep stosw ; fill screen with al while cx > 0
|
|
pop rcx
|
|
pop rsi
|
|
pop rdi
|
|
ret
|
|
|
|
write:
|
|
;-----------------------------------------------------------------------;
|
|
; x64/LM Text Printing Functions ;
|
|
; bl : color code ;
|
|
; esi : string address ;
|
|
;-----------------------------------------------------------------------;
|
|
mov edi, [NextTRAM] ;TRAM ADDRESS
|
|
push rsi
|
|
push rdi
|
|
.pLoop:
|
|
lodsb
|
|
cmp al, 0 ; while @al, i.e. while we're not hitting '\0'
|
|
je .pEnd
|
|
cmp al, 0x0A ; LF
|
|
je .lf
|
|
cmp al, 0x0D ; CR
|
|
je .cr
|
|
stosb ; text subpixel
|
|
mov al, bl
|
|
stosb ; color subpixel
|
|
add qword [NextTRAM], 0x2 ; Cursor moving
|
|
add qword [VGA_X], 0x2 ; coord + 2 because 2 subpixels
|
|
jmp .pLoop
|
|
.pEnd:
|
|
pop rdi
|
|
pop rsi
|
|
ret
|
|
.lf:
|
|
mov rax, [VGA_HEIGHT64]
|
|
add [NextTRAM], rax ; Cursor moving
|
|
add [NextTRAM], rax
|
|
add edi, eax ; Address moving
|
|
add edi, eax
|
|
jmp .pLoop
|
|
.cr:
|
|
push rax
|
|
mov rax, qword [VGA_X]
|
|
sub qword [NextTRAM], rax ; pos = X + Y * VGA_HEIGHT64. Donc pos - X = début de ligne
|
|
sub edi, edx
|
|
mov qword [VGA_X], 0
|
|
pop rax
|
|
jmp .pLoop
|
|
.scroll:
|
|
; XXX ;
|
|
jmp .pLoop
|