refactor(kernel): new calling conventions in klog

This commit is contained in:
d0p1 🏳️‍⚧️ 2024-12-30 20:27:11 +01:00
parent 7c8176688a
commit bd625fa56c
3 changed files with 296 additions and 4 deletions

View file

@ -39,9 +39,9 @@ kmain:
mov [0xC00B8008], dword 0x03640469 mov [0xC00B8008], dword 0x03640469
mov [0xC00B800C], dword 0x0153024F mov [0xC00B800C], dword 0x0153024F
mov esi, szMsgKernelAlive mov eax, szMsgKernelAlive
call klog call klog
mov esi, szMsgBuildDate mov eax, szMsgBuildDate
call klog call klog
call mm_bootstrap call mm_bootstrap
@ -118,7 +118,7 @@ kmain:
call klog call klog
jmp .halt jmp .halt
include 'klog.inc' include 'klog.new.inc'
include 'dev/console.inc' include 'dev/console.inc'
include 'dev/dev.inc' include 'dev/dev.inc'
include 'mm/bootstrap.inc' include 'mm/bootstrap.inc'

292
kernel/klog.new.inc Normal file
View file

@ -0,0 +1,292 @@
;; File: klog.inc
;; Kernel logging utilities
;;
COM1 = 0x3F8
;; Function: _klog_print
;;
;; In: EAX - Null-terminated string to print
_klog_print_str:
push ebp
mov ebp, esp
push esi
mov dx, COM1
mov esi, eax
@@:
lodsb
or al, al
jz @f
out dx, al
pusha
call cga_putc
popa
jmp @b
@@:
pop esi
leave
ret
;; Function: _klog_print_int
;;
;; In:
;; EAX - number
_klog_print_int:
test eax, eax
js .print_minus
.print_minus:
ret
;; Function: _klog_print_unsigned
;;
;; In:
;; EAX - number
_klog_print_unsigned:
push ebx
mov ebx, 10
xor ecx, ecx
@@:
xor edx, edx
div ebx
push edx
inc ecx
or eax, eax
jnz @b
@@:
pop eax
add al, 0
mov dx, COM1
out dx, al
pusha
call cga_putc
popa
dec ecx
or cl, cl
jnz @b
pop ebx
ret
;; Function: _klog_print_hex
;;
;; In:
;; EAX - number
_klog_print_hex:
push ebp
mov ebp, esp
push edi
mov edi, eax
mov eax, szHexPrefix
call _klog_print_str
or edi, edi
jz .print_zero
xor cl, cl
.begin:
cmp cl, 8
je .print_number
rol edi, 4
mov eax, edi
and eax, 0xF
mov al, byte [sDigit + eax]
mov [szKlogBuffer + ecx], al
inc cl
jmp .begin
.print_zero:
mov al, '0'
mov dx, COM1
out dx, al
pusha
call cga_putc
popa
jmp .end
.print_number:
mov [szKlogBuffer + ecx], byte 0
mov eax, szKlogBuffer
call _klog_print_str
.end:
pop edi
leave
ret
;; Function: _klog_print_time
;;
_klog_print_time:
; wait CMOS ready
@@:
mov al, 0x0A
out CMOS_COMMAND, al
in al, CMOS_DATA
and al, 0x80
jnz @b
mov al, CMOS_REG_HOUR
out CMOS_COMMAND, al
in al, CMOS_DATA
mov ah, al
shr ah, 4
and ah, 0xF
and al, 0xF
add ah, 0x30
add al, 0x30
mov [szTime + 1], ah
mov [szTime + 2], al
mov al, CMOS_REG_MINUTE
out CMOS_COMMAND, al
in al, CMOS_DATA
mov ah, al
shr ah, 4
and ah, 0xF
and al, 0xF
add ah, 0x30
add al, 0x30
mov [szTime + 4], ah
mov [szTime + 5], al
mov al, CMOS_REG_SECOND
out CMOS_COMMAND, al
in al, CMOS_DATA
mov ah, al
shr ah, 4
and ah, 0xF
and al, 0xF
add ah, 0x30
add al, 0x30
mov [szTime + 7], ah
mov [szTime + 8], al
mov eax, szTime
call _klog_print_str
ret
;; Function: klog
;;
;; Output kernel log
;;
;; In:
;; EAX - null-terminated string
;; STACK[X] - var_arg
klog:
push ebp
mov ebp, esp
push esi
mov esi, eax
; display log time
call _klog_print_time
mov ecx, 4
.begin:
mov al, [esi]
or al, al
jz .end
; search for formating
cmp al, '%'
jne .putchar
; read next char
inc esi
mov al, [esi]
; check if another '%'
cmp al, '%'
je .putchar
; check if string format
cmp al, 's'
jne @f
; print string
mov eax, [ebp + ecx]
push ecx
call _klog_print_str
pop ecx
add ecx, 4
jmp .next
; check if hex format
@@:
cmp al, 'x'
jne @f
mov eax, [ebp + ecx]
push ecx
call _klog_print_hex
pop ecx
add ecx, 4
jmp .next
; check if int format
@@:
cmp al, 'd'
jne @f
mov eax, [ebp + ecx]
push ecx
call _klog_print_int
pop ecx
add ecx, 4
jmp .next
; check if unsigned
@@:
cmp al, 'u'
jne @f
mov eax, [ebp + ecx]
push ecx
call _klog_print_unsigned
pop ecx
add ecx, 4
jmp .next
; unknown format
@@:
mov al, '?'
.putchar: ; XXX: fix this mess
mov dx, COM1
out dx, al
pusha
call cga_putc
popa
.next:
inc esi
jmp .begin
.end:
mov eax, szCRLF
call _klog_print_str
leave
ret
szTime db '[00:00:00] ', 0
szCRLF db CR, LF, 0
sDigit db '0123456789ABCDEF'
szHexPrefix db '0x', 0
szKlogBuffer db '00000000', 0

View file

@ -5,7 +5,7 @@
;; Setup recursive paging. ;; Setup recursive paging.
;; map page dir at 0xFFFFF000 ;; map page dir at 0xFFFFF000
mm_bootstrap: mm_bootstrap:
mov esi, szMsgMmBootstrap mov eax, szMsgMmBootstrap
call klog call klog
; 0x400000 ; 0x400000
; PDE entry: 0x7ffc00 phys addr and curr virt addr: 0xc07ffc00 ; PDE entry: 0x7ffc00 phys addr and curr virt addr: 0xc07ffc00