; X ========================================== BOOT (
bits 16
org 7C00h
;jmp $+2
 
start: ;cli
xor ax, ax
mov ds, ax
mov es, ax
mov ss, ax
mov sp, 7C00h
;sti
 
; ------------------------------------ Чтение след секторов
mov ax, 0208h      ; AH=02; AL=01 (функция чтения секторов; 8 секторов = 512x8=4096 = 4 КБ )
mov cl, 2          ; CH=initial 00; CL=02 (; 2й сектор)
mov dh, 0
mov bx, 7E00h      ; =7C00h+0200h: (:512); Адрес для ядра
int 13h            ; читаем и кладем туда
 
jmp 0000:7E00h     ; es:bx (seg:offset) переход к ядру; CS=0000, IP=7E00h
 
; ------------------------------------------ oo
oo:
mov ah, 14         ; 0Eh
.ch:               ; перебор строки
  lodsb            ; AL = очеред байт из DS:SI
  int 10h          ; вывод
  loop .ch
ret
 
; ------------------------------------------ cc
cc:                ; Очистка экрана
mov ax, 3
int 10h
ret
 
; ------------------------------------------ re
re: ; 
    ; переход на новую строку
mov ah, 14  ; 0Eh
mov al, 0Ah ; LF
int 10h
mov al, 0Dh ; CR
int 10h
xor al, al
xor si,si
ret
 
; ------------------------------------------ hex
hex:  ; ebx
      ; Вывод содержимого ebx в 16-рич виде
        mov ah, 14  ; режим вывода текста
        mov cx, 8   ; количество итераций
 ascii: rol ebx, 4  ; YYYY -> BL[XXXX_....]
        mov al, 15  ;   0000_1111
        and al, bl  ; & XXXX_YYYY -> 0000_YYYY
        add al, 48  ; 0..9
        cmp al, 58  
         jl hexoo   ; AL+48 < 58
        add al, 7   ; A..F
 hexoo: int 10h
        loop ascii
  mov al, 0x20 ; SPACE
  int 10h
  ret
 
; ------------------------------------------ NicPciCfgDump
NicPciCfgDump:
mov   DX, 0x1004   ; 16 строк по 4 dword
xor   di, di       ; PCI regNum=0
.dump:
mov   ax, 0xB10A   ; fn Read_PCI_Conf_Dword
mov   bx, 0x0018   ; BDF
int   1Ah          ; ECX = Dword
bswap ecx          ; зеркалим по PCI спец
mov   ebx, ecx
call  hex
add   di, 4       
dec   DL           ; след dword
jnz  .dump
call  re
mov   DL, 4       
dec   DH           ; след строка
jnz  .dump
ret
 
; ------------------------------------------ CfgDump
CfgDump:
mov    DX, 0x0404      ; 4 строки по 4 dword
.dump:
mov   ebx, [fs:edi]    ; ECX = Dword
bswap ebx
call  hex
add   di, 4
dec   DL               ; след dword
jnz  .dump
call  re
mov   DL, 4
dec   DH               ; след строка
jnz  .dump
ret
 
; ------------------------------------ UM
UM:
; Создание GDT
lgdt [GDT]    ; Адрес таблицы GDT (Глобальная Таблица Дескрипторов)
cli           ; выкл прерывания
in  al, 0x70  ; Немаскируемые прерывания NMI
 
or  al, 0x80  ; 1000'0000
out 0x70, al  ;
 
mov eax, cr0  ; Переход в PM
inc al        ; вкл в CR0[0]=РМ
mov cr0, eax  ; -> PM
jmp $+2       ; после смены режимов обязателен JMP
 
mov ax, 8     ; селектор 4Gb-дескриптора в GDT
mov fs, ax    ; запись в сегм.регистр FS (свободный)
 
mov eax, cr0  ; Обратно в RM
dec al        ; вкл в CR0[0]=РМ
mov cr0, eax
jmp $+2       ; после смены режимов обязателен JMP
 
in  al, 0x70  ; снять запрет с NMI
and al, 0x7F  ; 0111'1111
out 0x70, al
 
xor ax, ax    ;
mov fs, ax    ;
sti           ; вкл прерывания
ret
; ------------------------------------ UM/
 
; GDT_UM
align 8                      ; адреса GDT кратны 16
Table equ $-8                ; нулевой дескриптор
      dq 0x00cf93000000ffff  ; дескриптор данных (4Gb)
  GDT dw $-Table-1           ; размер таблицы
      dd Table               ; адрес таблицы
 
; Messages
str1 db ' NIC_PCI_CFG_SPACE:'
len1 equ $-str1
str2 db ' NIC_PCI_COMMON_CFG:'
len2 equ $-str2
str3 db ' NIC_PCI_DEVICE_CFG:'
len3 equ $-str3
 
; -----------------------------------------
times 510-($-$$) db 0
dw 0xAA55
; ========================================= BOOT )
; ***************************************** CORE ( :7E00h
 
call cc
; call UM              ; Unreal Mode
 
; Получаем BDF {Bus:Dev:Fn} VirtNet
mov cx, 0x1000  ; DeviceID, 2 байта
mov dx, 0x1AF4  ; VendorID, 2 байта
mov ax, 0xB102  ; AH: PciFnID, AL: FindPciDevice.fn
int 1Ah         ; NIC_BDF = 0x0018 = BX{ BH: BusNum, BL:[DevNum:5, FnNum:3] }
 
PORT dw ?          ; 2 байта для номера порта
 
mov di, 16         ; 0+16 = NicPciConf +0x10: BAR0
mov ax, 0xB10A     ; ReadCfgDword.fn
                   ; BX: NIC_BDF
int 1Ah            ; ECX = Dword = порт BAR0
 
and cl, 0xFE       ; 0xC061 -> 0xC060
mov [PORT], cx     ; сохраним
 
mov dx, [PORT]     ; номер порта в DX = С060h
add dx, 12h        ; сместиться в порту к "регистру статуса" = C072h
mov al, 0          ; <------- код "Device_reset=0"
out dx, al         ; Reset!
inc al             ; <------- код "Acknowledge=1"
out dx, al         ; Hello!
mov al, 3          ; <------- код "Driver=2"
out dx, al         ; I'm VirtNet driver!
 
; Дамп NicPciCfg
call NicPciCfgDump
call re

mov al,0x3           ; <------- код "Driver=2"
out dx,al            ; I'm VirtNet driver!