feat(kernel): cga text mode driver
This commit is contained in:
parent
baaeda937f
commit
7fcb200475
|
@ -12,7 +12,11 @@ SRCS = kernel.asm \
|
||||||
lock.inc \
|
lock.inc \
|
||||||
gdt.inc \
|
gdt.inc \
|
||||||
isr.inc \
|
isr.inc \
|
||||||
pic.inc
|
pic.inc \
|
||||||
|
idt.inc \
|
||||||
|
dev/at/pit.inc \
|
||||||
|
dev/at/cga.inc \
|
||||||
|
dev/at/kbd.inc
|
||||||
|
|
||||||
.PHONY: all
|
.PHONY: all
|
||||||
all: $(KERNEL)
|
all: $(KERNEL)
|
||||||
|
|
131
kernel/dev/at/cga.inc
Normal file
131
kernel/dev/at/cga.inc
Normal file
|
@ -0,0 +1,131 @@
|
||||||
|
;; File: cga.inc
|
||||||
|
;;
|
||||||
|
;; Usefull links:
|
||||||
|
;; - <http://www.techhelpmanual.com/901-color_graphics_adapter_i_o_ports.html>
|
||||||
|
;; - <http://www.osdever.net/FreeVGA/vga/crtcreg.htm>
|
||||||
|
CGA_MEMORY = 0xC00B8000
|
||||||
|
CGA_COMMAND = 0x3d4
|
||||||
|
CGA_DATA = 0x3d5
|
||||||
|
CGA_CURSOR_HIGH = 0xE
|
||||||
|
CGA_CURSOR_LOW = 0xF
|
||||||
|
CGA_COLUMNS = 80
|
||||||
|
CGA_LINES = 24
|
||||||
|
|
||||||
|
;; Function: cga_getpos
|
||||||
|
;;
|
||||||
|
;; Out:
|
||||||
|
;; AX - cursor position
|
||||||
|
cga_getpos:
|
||||||
|
; read cursor position
|
||||||
|
xor ax, ax
|
||||||
|
|
||||||
|
xchg bx, bx
|
||||||
|
|
||||||
|
; get high
|
||||||
|
mov dx, CGA_COMMAND
|
||||||
|
mov al, CGA_CURSOR_HIGH
|
||||||
|
out dx, al
|
||||||
|
mov dx, CGA_DATA
|
||||||
|
in al, dx
|
||||||
|
xchg al, ah
|
||||||
|
|
||||||
|
; get low
|
||||||
|
mov dx, CGA_COMMAND
|
||||||
|
mov al, CGA_CURSOR_LOW
|
||||||
|
out dx, al
|
||||||
|
mov dx, CGA_DATA
|
||||||
|
in al, dx
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
;; Function: cga_setpos
|
||||||
|
;;
|
||||||
|
;; In:
|
||||||
|
;; AX - cursor position
|
||||||
|
cga_setpos:
|
||||||
|
xchg bx, bx
|
||||||
|
mov dx, CGA_COMMAND
|
||||||
|
push ax
|
||||||
|
mov al, CGA_CURSOR_HIGH
|
||||||
|
out dx, al
|
||||||
|
pop ax
|
||||||
|
xchg al, ah
|
||||||
|
mov dx, CGA_DATA
|
||||||
|
out dx, al
|
||||||
|
|
||||||
|
mov dx, CGA_COMMAND
|
||||||
|
mov al, CGA_CURSOR_LOW
|
||||||
|
out dx, al
|
||||||
|
xchg al, ah
|
||||||
|
mov dx, CGA_DATA
|
||||||
|
out dx, al
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
;; Function: cga_putc
|
||||||
|
;;
|
||||||
|
;; In:
|
||||||
|
;; AL - charactere to print
|
||||||
|
cga_putc:
|
||||||
|
push ebp
|
||||||
|
mov ebp, esp
|
||||||
|
sub esp, 0x2
|
||||||
|
|
||||||
|
push eax
|
||||||
|
call cga_getpos
|
||||||
|
mov [ebp-0x2], ax
|
||||||
|
pop eax
|
||||||
|
|
||||||
|
cmp al, LF
|
||||||
|
jne @f
|
||||||
|
mov ax, [ebp-0x2]
|
||||||
|
mov dl, CGA_COLUMNS
|
||||||
|
div dl
|
||||||
|
mov al, CGA_COLUMNS
|
||||||
|
sub al, ah
|
||||||
|
xor ah, ah
|
||||||
|
mov cx, [ebp-0x2]
|
||||||
|
add cx, ax
|
||||||
|
jmp .end
|
||||||
|
@@:
|
||||||
|
mov edx, CGA_MEMORY
|
||||||
|
xor ecx, ecx
|
||||||
|
mov cx, [ebp-0x2]
|
||||||
|
shl cx, 1
|
||||||
|
add edx, ecx
|
||||||
|
mov ah, 0x07
|
||||||
|
mov word [edx], ax
|
||||||
|
mov cx, [ebp-0x2]
|
||||||
|
inc cx
|
||||||
|
|
||||||
|
mov ax, cx
|
||||||
|
mov dl, CGA_COLUMNS
|
||||||
|
div dl
|
||||||
|
cmp al, CGA_LINES
|
||||||
|
jbe .end
|
||||||
|
|
||||||
|
mov [ebp-0x2], cx
|
||||||
|
|
||||||
|
; scroll up
|
||||||
|
push esi
|
||||||
|
push edi
|
||||||
|
mov ecx, CGA_COLUMNS*(CGA_LINES-1)
|
||||||
|
mov edi, CGA_MEMORY
|
||||||
|
mov esi, CGA_MEMORY+80*2
|
||||||
|
rep movsw
|
||||||
|
|
||||||
|
mov ecx, CGA_COLUMNS
|
||||||
|
xor ax, ax
|
||||||
|
mov edi, CGA_MEMORY+(CGA_COLUMNS*(CGA_LINES-1)*2)
|
||||||
|
rep stosw
|
||||||
|
|
||||||
|
pop esi
|
||||||
|
pop edi
|
||||||
|
|
||||||
|
mov cx, CGA_COLUMNS*(CGA_LINES-1)
|
||||||
|
.end:
|
||||||
|
mov ax, cx
|
||||||
|
call cga_setpos
|
||||||
|
|
||||||
|
leave
|
||||||
|
ret
|
18
kernel/dev/at/kbd.inc
Normal file
18
kernel/dev/at/kbd.inc
Normal file
|
@ -0,0 +1,18 @@
|
||||||
|
;; File: kbd.inc
|
||||||
|
|
||||||
|
kbd_getc:
|
||||||
|
ret
|
||||||
|
|
||||||
|
kbd_irq:
|
||||||
|
pusha
|
||||||
|
|
||||||
|
mov esi, szMsgKbdIRQ
|
||||||
|
call klog
|
||||||
|
|
||||||
|
mov al, PIC_EOI
|
||||||
|
out PIC1_COMMAND, al
|
||||||
|
|
||||||
|
popa
|
||||||
|
iret
|
||||||
|
|
||||||
|
szMsgKbdIRQ db "KBD: IRQ", 0
|
29
kernel/dev/at/pit.inc
Normal file
29
kernel/dev/at/pit.inc
Normal file
|
@ -0,0 +1,29 @@
|
||||||
|
;; File: pit.inc
|
||||||
|
;;
|
||||||
|
;; Usefull links:
|
||||||
|
;; - <http://www.osdever.net/bkerndev/Docs/pit.htm>
|
||||||
|
|
||||||
|
PIT_CHANNEL0 = 0x40
|
||||||
|
PIT_CHANNEL1 = 0x40
|
||||||
|
PIT_CHANNEL2 = 0x42
|
||||||
|
PIT_COMMAND = 0x43
|
||||||
|
|
||||||
|
;; Function: pit_init
|
||||||
|
pit_init:
|
||||||
|
ret
|
||||||
|
|
||||||
|
;; Function: pit_irq
|
||||||
|
pit_irq:
|
||||||
|
pusha
|
||||||
|
|
||||||
|
;mov esi, szMsgPitIRQ
|
||||||
|
;call klog
|
||||||
|
|
||||||
|
mov al, PIC_EOI
|
||||||
|
out PIC1_COMMAND, al
|
||||||
|
|
||||||
|
popa
|
||||||
|
|
||||||
|
iret
|
||||||
|
|
||||||
|
szMsgPitIRQ db "PIT: IRQ", 0
|
2
kernel/dev/console.inc
Normal file
2
kernel/dev/console.inc
Normal file
|
@ -0,0 +1,2 @@
|
||||||
|
;; File: console.inc
|
||||||
|
|
9
kernel/dev/dev.inc
Normal file
9
kernel/dev/dev.inc
Normal file
|
@ -0,0 +1,9 @@
|
||||||
|
;; File: dev.inc
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
struc Device {
|
||||||
|
.write dd ?
|
||||||
|
.read dd ?
|
||||||
|
}
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
;; File: gdt.inc
|
||||||
|
|
||||||
gdt:
|
gdt:
|
||||||
; null descriptor
|
; null descriptor
|
||||||
|
@ -30,3 +31,7 @@ gdt:
|
||||||
pGDT:
|
pGDT:
|
||||||
dw gdt.end - gdt - 1
|
dw gdt.end - gdt - 1
|
||||||
dd gdt
|
dd gdt
|
||||||
|
|
||||||
|
gdt_set_tss:
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
|
@ -1,10 +1,51 @@
|
||||||
|
;; File: idt.inc
|
||||||
|
|
||||||
idt_set_table:
|
idt_set_gate:
|
||||||
|
mov [aInterruptGate + (ecx * 8)], ax
|
||||||
|
mov [aInterruptGate + (ecx * 8) + 2], word 0x08
|
||||||
|
|
||||||
|
mov [aInterruptGate + (ecx * 8) + 5], word 0x8E
|
||||||
|
shr eax, 16
|
||||||
|
mov [aInterruptGate + (ecx * 8) + 6], ax
|
||||||
ret
|
ret
|
||||||
|
|
||||||
idt_setup:
|
idt_setup:
|
||||||
|
xor ecx, ecx
|
||||||
|
@@:
|
||||||
|
mov eax, [aISRTable + (ecx * 4)]
|
||||||
|
call idt_set_gate
|
||||||
|
inc ecx
|
||||||
|
cmp ecx, 32
|
||||||
|
jb @b
|
||||||
|
|
||||||
|
mov eax, pit_irq
|
||||||
|
call idt_set_gate
|
||||||
|
inc ecx
|
||||||
|
|
||||||
|
mov eax, kbd_irq
|
||||||
|
call idt_set_gate
|
||||||
|
inc ecx
|
||||||
|
|
||||||
|
@@:
|
||||||
|
mov eax, irq_dummy
|
||||||
|
call idt_set_gate
|
||||||
|
inc ecx
|
||||||
|
cmp ecx, 0x30
|
||||||
|
jb @b
|
||||||
|
|
||||||
|
mov ecx, 0x42
|
||||||
|
mov eax, isr_syscall
|
||||||
|
call idt_set_gate
|
||||||
|
|
||||||
|
lidt [pIDT]
|
||||||
|
sti
|
||||||
ret
|
ret
|
||||||
|
|
||||||
pIdt:
|
pIDT:
|
||||||
dw ?
|
dw aInterruptGate.end-aInterruptGate-1
|
||||||
dd ?
|
dd aInterruptGate
|
||||||
|
|
||||||
|
; variable: idt_entries
|
||||||
|
aInterruptGate:
|
||||||
|
dd 256*2 dup(0)
|
||||||
|
.end:
|
||||||
|
|
|
@ -0,0 +1,2 @@
|
||||||
|
irq_dummy:
|
||||||
|
iret
|
|
@ -18,54 +18,6 @@ forward
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
idt_setup:
|
|
||||||
xor ecx, ecx
|
|
||||||
@@:
|
|
||||||
mov eax, [aISRTable + (ecx * 4)]
|
|
||||||
mov [aInterruptGate + (ecx * 8)], ax
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 2], word 0x08
|
|
||||||
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 5], word 0x8E
|
|
||||||
shr eax, 16
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 6], ax
|
|
||||||
inc ecx
|
|
||||||
cmp ecx, 32
|
|
||||||
jb @b
|
|
||||||
@@:
|
|
||||||
mov eax, irq_dummy
|
|
||||||
mov [aInterruptGate + (ecx * 8)], ax
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 2], word 0x08
|
|
||||||
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 5], word 0x8E
|
|
||||||
shr eax, 16
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 6], ax
|
|
||||||
inc ecx
|
|
||||||
cmp ecx, 0x30
|
|
||||||
jb @b
|
|
||||||
|
|
||||||
mov ecx, 0x42
|
|
||||||
mov eax, isr_syscall
|
|
||||||
mov [aInterruptGate + (ecx * 8)], ax
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 2], word 0x08
|
|
||||||
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 5], word 0x8E
|
|
||||||
shr eax, 16
|
|
||||||
mov [aInterruptGate + (ecx * 8) + 6], ax
|
|
||||||
|
|
||||||
lidt [pIDT]
|
|
||||||
sti
|
|
||||||
ret
|
|
||||||
|
|
||||||
pIDT:
|
|
||||||
dw aInterruptGate.end-aInterruptGate-1
|
|
||||||
dd aInterruptGate
|
|
||||||
|
|
||||||
; variable: idt_entries
|
|
||||||
aInterruptGate:
|
|
||||||
dd 256*2 dup(0)
|
|
||||||
.end:
|
|
||||||
|
|
||||||
|
|
||||||
irq_dummy:
|
irq_dummy:
|
||||||
iret
|
iret
|
||||||
|
|
||||||
|
|
|
@ -60,10 +60,15 @@ kmain:
|
||||||
lgdt [pGDT]
|
lgdt [pGDT]
|
||||||
; I don't think i need to reload segment cuz their value are already correct
|
; I don't think i need to reload segment cuz their value are already correct
|
||||||
|
|
||||||
|
|
||||||
call idt_setup
|
call idt_setup
|
||||||
|
|
||||||
;int 0x42
|
call pit_init
|
||||||
|
|
||||||
|
mov eax, SYSCALL_EXIT
|
||||||
|
int 0x42
|
||||||
|
|
||||||
|
mov al, 'X'
|
||||||
|
call cga_putc
|
||||||
|
|
||||||
.halt:
|
.halt:
|
||||||
hlt
|
hlt
|
||||||
|
@ -81,7 +86,11 @@ kmain:
|
||||||
include 'gdt.inc'
|
include 'gdt.inc'
|
||||||
include 'syscall.inc'
|
include 'syscall.inc'
|
||||||
include 'isr.inc'
|
include 'isr.inc'
|
||||||
|
include 'idt.inc'
|
||||||
include 'pic.inc'
|
include 'pic.inc'
|
||||||
|
include 'dev/at/pit.inc'
|
||||||
|
include 'dev/at/kbd.inc'
|
||||||
|
include 'dev/at/cga.inc'
|
||||||
|
|
||||||
|
|
||||||
szMsgKernelAlive db "Kernel (", VERSION_FULL , ") is alive", 0
|
szMsgKernelAlive db "Kernel (", VERSION_FULL , ") is alive", 0
|
||||||
|
|
|
@ -34,7 +34,7 @@ klog_print:
|
||||||
or al, al
|
or al, al
|
||||||
jz @f
|
jz @f
|
||||||
out dx, al
|
out dx, al
|
||||||
;call klog_kputc
|
;call klog_kput
|
||||||
jmp @b
|
jmp @b
|
||||||
@@:
|
@@:
|
||||||
ret
|
ret
|
||||||
|
|
|
@ -1,3 +1,6 @@
|
||||||
|
;; File: coff.inc
|
||||||
|
|
||||||
|
;; Struc: COFFFileHdr
|
||||||
struc COFFFileHdr {
|
struc COFFFileHdr {
|
||||||
.f_magic dw ?
|
.f_magic dw ?
|
||||||
.f_nscns dw ?
|
.f_nscns dw ?
|
||||||
|
|
|
@ -16,9 +16,20 @@ rc4_init:
|
||||||
mov ebp, esp
|
mov ebp, esp
|
||||||
|
|
||||||
mov eax, [ebp+8]
|
mov eax, [ebp+8]
|
||||||
xor ecx, ecx
|
xor cx, cx
|
||||||
|
|
||||||
|
@@:
|
||||||
|
mov byte [eax], byte cx
|
||||||
|
inc cx
|
||||||
|
inc eax
|
||||||
|
cmp cx, 255
|
||||||
|
jne @b
|
||||||
|
|
||||||
|
xor cx, cx
|
||||||
|
mov eax, [ebp+8]
|
||||||
|
@@:
|
||||||
|
|
||||||
|
|
||||||
.loop:
|
|
||||||
|
|
||||||
.end:
|
.end:
|
||||||
leave
|
leave
|
||||||
|
|
Loading…
Reference in a new issue