Add diagnostics program.
This commit is contained in:
Matthieu Bucchianeri
@@ -1320,9 +1320,6 @@ unsupported_msg db 'Unsupported INT13h Function ', 0
|
||||
boot_msg db 'Booting from SD Card...', 0xD, 0xA, 0
|
||||
no_boot_msg db 'Not bootable', 0xD, 0xA, 0
|
||||
%endif
|
||||
colon db ':', 0
|
||||
space db ' ', 0
|
||||
newline db 0xD, 0xA, 0
|
||||
|
||||
%ifdef DEBUG
|
||||
handler_msg db 'INT13h Function ', 0
|
||||
|
||||
@@ -1,2 +1,3 @@
|
||||
..\Driver_Build_Tools\NASM\nasm.exe -f bin -o bootrom.com -DAS_COM_PROGRAM .\bootrom.asm
|
||||
..\Driver_Build_Tools\NASM\nasm.exe -f bin -o bootrom .\bootrom.asm & python checksum.py & python generate_header.py
|
||||
..\Driver_Build_Tools\NASM\nasm.exe -f bin -o xtmdiags.com .\diags.asm
|
||||
|
||||
354
XTMax/Drivers/BootROM/diags.asm
Normal file
354
XTMax/Drivers/BootROM/diags.asm
Normal file
@@ -0,0 +1,354 @@
|
||||
org 0x100
|
||||
|
||||
;
|
||||
; The base I/O port for the XTMAX SD Card.
|
||||
;
|
||||
%define XTMAX_IO_BASE (0x280)
|
||||
%define REG_SCRATCH_0 (XTMAX_IO_BASE+2) ; fixed disk id
|
||||
%define REG_SCRATCH_1 (XTMAX_IO_BASE+3) ; BIOS INT13h segment
|
||||
%define REG_SCRATCH_2 (XTMAX_IO_BASE+4) ; BIOS INT13h segment
|
||||
%define REG_SCRATCH_3 (XTMAX_IO_BASE+5) ; BIOS INT13h offset
|
||||
%define REG_SCRATCH_4 (XTMAX_IO_BASE+6) ; BIOS INT13h offset
|
||||
|
||||
entry:
|
||||
mov ax, welcome_msg
|
||||
call print_string
|
||||
|
||||
;
|
||||
; Inspect the INT13h and the HDNUM
|
||||
;
|
||||
mov ax, current_13h_msg
|
||||
call print_string
|
||||
xor ax, ax ; INT vector segment
|
||||
mov es, ax
|
||||
mov ax, es:[0x13*4+2]
|
||||
call print_hex
|
||||
mov ax, colon
|
||||
call print_string
|
||||
mov ax, es:[0x13*4]
|
||||
call print_hex
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, saved_13h_msg
|
||||
call print_string
|
||||
mov dx, REG_SCRATCH_1
|
||||
in ax, dx
|
||||
call print_hex
|
||||
mov ax, colon
|
||||
call print_string
|
||||
mov dx, REG_SCRATCH_3
|
||||
in ax, dx
|
||||
call print_hex
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, hdnum_msg
|
||||
call print_string
|
||||
mov ax, 0x40 ; BIOS data area
|
||||
mov es, ax
|
||||
mov al, es:[0x75] ; HDNUM
|
||||
call print_hex_byte
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, disk_id_msg
|
||||
call print_string
|
||||
mov dx, REG_SCRATCH_0
|
||||
in al, dx
|
||||
xor ah, ah
|
||||
call print_hex_byte
|
||||
mov ax, newline
|
||||
call print_string
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
;
|
||||
; Inspect the Fixed Disk Parameters Tables
|
||||
;
|
||||
mov ax, disk80_fdpt_msg
|
||||
call print_string
|
||||
xor ax, ax ; INT vector segment
|
||||
mov es, ax
|
||||
mov ax, es:[0x41*4+2]
|
||||
mov bx, ax
|
||||
call print_hex
|
||||
mov ax, colon
|
||||
call print_string
|
||||
mov ax, es:[0x41*4]
|
||||
mov si, ax
|
||||
call print_hex
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, space
|
||||
call print_string
|
||||
mov ax, space
|
||||
call print_string
|
||||
mov es, bx
|
||||
mov cx, 18
|
||||
.dump_disk80_fdpt:
|
||||
mov al, es:[si]
|
||||
inc si
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk80_fdpt
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, disk81_fdpt_msg
|
||||
call print_string
|
||||
xor ax, ax ; INT vector segment
|
||||
mov es, ax
|
||||
mov ax, es:[0x46*4+2]
|
||||
mov bx, ax
|
||||
call print_hex
|
||||
mov ax, colon
|
||||
call print_string
|
||||
mov ax, es:[0x46*4]
|
||||
mov si, ax
|
||||
call print_hex
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov ax, space
|
||||
call print_string
|
||||
mov ax, space
|
||||
call print_string
|
||||
mov es, bx
|
||||
mov cx, 18
|
||||
.dump_disk81_fdpt:
|
||||
mov al, es:[si]
|
||||
inc si
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk81_fdpt
|
||||
mov ax, newline
|
||||
call print_string
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
;
|
||||
; Invoke Read Parameters on the fixed disks.
|
||||
;
|
||||
mov ax, parm_disk80_msg
|
||||
call print_string
|
||||
xor ax, ax
|
||||
xor bx, bx
|
||||
xor cx, cx
|
||||
xor dx, dx
|
||||
xor si, si
|
||||
xor di, di
|
||||
xor bp, bp
|
||||
mov dl, 0x80
|
||||
mov ah, 0x08
|
||||
call dump_regs
|
||||
int 0x13
|
||||
call dump_regs
|
||||
mov ax, newline
|
||||
|
||||
call print_string
|
||||
mov ax, parm_disk81_msg
|
||||
call print_string
|
||||
xor ax, ax
|
||||
xor bx, bx
|
||||
xor cx, cx
|
||||
xor dx, dx
|
||||
xor si, si
|
||||
xor di, di
|
||||
xor bp, bp
|
||||
mov dl, 0x81
|
||||
mov ah, 0x08
|
||||
call dump_regs
|
||||
int 0x13
|
||||
call dump_regs
|
||||
|
||||
; wait for kbd
|
||||
mov ah, 0x01
|
||||
int 0x21
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
;
|
||||
; Read First Sector on the fixed disks.
|
||||
;
|
||||
xor ax, ax
|
||||
mov cx, 256
|
||||
mov di, buf_read
|
||||
rep stosw
|
||||
mov ax, read_disk80_msg
|
||||
call print_string
|
||||
xor ax, ax
|
||||
xor bx, bx
|
||||
xor cx, cx
|
||||
xor dx, dx
|
||||
xor si, si
|
||||
xor di, di
|
||||
xor bp, bp
|
||||
mov dl, 0x80
|
||||
mov ah, 0x02
|
||||
mov bx, ds
|
||||
mov es, bx
|
||||
mov bx, buf_read
|
||||
mov ch, 0
|
||||
mov cl, 1
|
||||
mov dh, 0
|
||||
mov al, 1
|
||||
call dump_regs
|
||||
int 0x13
|
||||
call dump_regs
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov cx, 16
|
||||
mov si, buf_read
|
||||
.dump_disk80_sector_1:
|
||||
lodsb
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk80_sector_1
|
||||
mov ax, newline
|
||||
call print_string
|
||||
mov ax, dotdotdot
|
||||
call print_string
|
||||
mov cx, 16
|
||||
add si, 512-16-16
|
||||
.dump_disk80_sector_2:
|
||||
lodsb
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk80_sector_2
|
||||
mov ax, newline
|
||||
call print_string
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
xor ax, ax
|
||||
mov cx, 256
|
||||
mov di, buf_read
|
||||
rep stosw
|
||||
mov ax, read_disk81_msg
|
||||
call print_string
|
||||
xor ax, ax
|
||||
xor bx, bx
|
||||
xor cx, cx
|
||||
xor dx, dx
|
||||
xor si, si
|
||||
xor di, di
|
||||
xor bp, bp
|
||||
mov dl, 0x81
|
||||
mov ah, 0x02
|
||||
mov bx, ds
|
||||
mov es, bx
|
||||
mov bx, buf_read
|
||||
mov ch, 0
|
||||
mov cl, 1
|
||||
mov dh, 0
|
||||
mov al, 1
|
||||
call dump_regs
|
||||
int 0x13
|
||||
call dump_regs
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
mov cx, 16
|
||||
mov si, buf_read
|
||||
.dump_disk81_sector_1:
|
||||
lodsb
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk81_sector_1
|
||||
mov ax, newline
|
||||
call print_string
|
||||
mov ax, dotdotdot
|
||||
call print_string
|
||||
mov cx, 16
|
||||
add si, 512-16-16
|
||||
.dump_disk81_sector_2:
|
||||
lodsb
|
||||
call print_hex_byte
|
||||
mov ax, space
|
||||
call print_string
|
||||
loop .dump_disk81_sector_2
|
||||
mov ax, newline
|
||||
call print_string
|
||||
|
||||
;
|
||||
; DOS exit program.
|
||||
;
|
||||
mov ah, 0x4c
|
||||
xor al, al
|
||||
int 0x21
|
||||
|
||||
buf_read times 512 db 0
|
||||
|
||||
;
|
||||
; General utilities
|
||||
;
|
||||
|
||||
%define AS_COM_PROGRAM
|
||||
%include "utils.inc"
|
||||
|
||||
;
|
||||
; Display an 8-bit value in hex.
|
||||
; in: AL = value
|
||||
; out: AX = <TRASH>
|
||||
;
|
||||
print_hex_byte:
|
||||
pushf
|
||||
push ds
|
||||
push bx
|
||||
push cx
|
||||
push dx
|
||||
push si
|
||||
mov dl, al
|
||||
xor ah, ah
|
||||
%ifndef AS_COM_PROGRAM
|
||||
mov ax, ROM_SEGMENT
|
||||
mov ds, ax
|
||||
%endif
|
||||
xor bx, bx
|
||||
cld
|
||||
.nibble1:
|
||||
mov si, dx
|
||||
mov cl, 4
|
||||
shr si, cl
|
||||
and si, 0xf
|
||||
mov al, [hex_map+si]
|
||||
mov ah, 0xe
|
||||
int 0x10
|
||||
.nibble2:
|
||||
mov si, dx
|
||||
and si, 0xf
|
||||
mov al, [hex_map+si]
|
||||
mov ah, 0xe
|
||||
int 0x10
|
||||
pop si
|
||||
pop dx
|
||||
pop cx
|
||||
pop bx
|
||||
pop ds
|
||||
popf
|
||||
ret
|
||||
|
||||
;
|
||||
; Strings
|
||||
;
|
||||
|
||||
welcome_msg db 'XTMax BootROM diagnostics', 0xD, 0xA, 0xD, 0xA, 0
|
||||
current_13h_msg db 'Current INT13h Vector = ', 0
|
||||
saved_13h_msg db 'Saved INT13h Vector = ', 0
|
||||
hdnum_msg db 'BIOS Data Area HDNUM = ', 0
|
||||
disk_id_msg db 'XTMax Fixed Disk ID = ', 0
|
||||
disk80_fdpt_msg db 'Fixed Disk 80h Parameters Table = ', 0
|
||||
disk81_fdpt_msg db 'Fixed Disk 81h Parameters Table = ', 0
|
||||
parm_disk80_msg db 'Call Fixed Disk 80h Read Parameters', 0xD, 0xA, 0
|
||||
parm_disk81_msg db 'Call Fixed Disk 81h Read Parameters', 0xD, 0xA, 0
|
||||
read_disk80_msg db 'Read First Sector on Fixed Disk 80h', 0xD, 0xA, 0
|
||||
read_disk81_msg db 'Read First Sector on Fixed Disk 81h', 0xD, 0xA, 0
|
||||
dotdotdot db '[...]', 0xD, 0xA, 0
|
||||
@@ -142,3 +142,7 @@ dump_regs:
|
||||
|
||||
registers_msg db ' AX BX CX DX DS SI ES DI BP FLAGS', 0xD, 0xA, 0
|
||||
%endif
|
||||
|
||||
colon db ':', 0
|
||||
space db ' ', 0
|
||||
newline db 0xD, 0xA, 0
|
||||
|
||||
Reference in New Issue
Block a user