pop bp
pop bx
pop dx
pop cx
pop ax
ret
interrupt ENDP
;
PAGE
;
; ============ ОБРАБОТЧИКИ КОМАНД ====================================
;
NO_COMAND PROC NEAR ; неподдерживаемая команда
ret ; возврат с ошибкой
NO_COMMAND ENDP
;
MEDIA_CHECK PROC NEAR ; 1 - проверка носителя
mov request.change,NotChanged
xor ax,ax
ret
MEDIA_CHECK ENDP
;
BUILD_BPB PROC NEAR ; 2 - построить BPB
mov request.bpbptro,offset bpb
mov request.bpbptrs,cs
xor ax,ax
ret
BUILD_BPB ENDP
;
IOCTL_INPUT PROC NEAR ; 3 - ввод IOCTL
xor ax,ax
ret
IOCTL_INPUT ENDP
;
READ PROC NEAR ; 4 - ввод из устройства
call verify ; проверка и установка параметров
jc rd_err ; выход по ошибке
les di,request.bufptr ; считываем в буфер
rep movsw ; передача
xor ax,ax ; нет ошибок
rd_err:
ret
READ ENDP
;
- 6-62 -
READ_NOWAIT PROC NEAR ; 5 - неразрушающий ввод
xor ax,ax ; без ожидания
ret
READ_NOWAIT ENDP
;
INPUT_STATUS PROC NEAR ; 6 - ввод статуса
xor ax,ax
ret
INPUT_STATUS ENDP
;
INPUT_FLUSH PROC NEAR ; 7 - сбросить входную очередь
xor ax,ax
ret
INPUT_FLUSH ENDP
;
WRITE PROC NEAR ; 8 - вывод на устройство
call verify ; проверка и установка параметров
jc wr_err ; выход при ошибке
push ds ; сохраним сегмент "сектора"
lds si,request.bufptr ; записываем из буфера
pop es ; на диск
xor di,di ; с нулевым смещением
rep movsw ; передача
xor ax,ax ; нет ошибок
wr_err:
ret
WRITE ENDP
;
WRITE_VERIFY PROC NEAR ; 9 - вывод с проверкой
call write
ret
WRITE_VERIFY ENDP
;
OUTPUT_STATUS PROC NEAR ; A - вывод статуса
xor ax,ax
ret
OUTPUT_STATUS ENDP
;
OUTPUT_FLUSH PROC NEAR ; B - сбросить выходную очередь
xor ax,ax
ret
OUTPUT_FLUSH ENDP
;
IOCTL_OUTPUT PROC NEAR ; C - вывод IOCTL
xor ax,ax
ret
IOCTL_OUTPUT ENDP
;
DEVICE_OPEN PROC NEAR ; D - открыть устройство
xor ax,ax
ret
DEVICE_OPEN ENDP
;
DEVICE_CLOSE PROC NEAR ; E - закрыть устройство
xor ax,ax
ret
DEVICE_CLOSE ENDP
- 6-63 -
;
REMOVABLE PROC NEAR ; F - носитель сменный ?
mov ax,ST_BUSY ; нет !
ret
REMOVABLE ENDP
;
GENERIC_IOCTL PROC NEAR ; 13 - групповой IOCTL запрос
xor ax,ax
ret
GENERIC_IOCTL ENDP
;
GET_LOGICAL PROC NEAR ; 17 - получить имя логического
xor ax,ax ; диска
ret
GET_LOGICAL ENDP
;
SET_LOGICAL PROC NEAR ; 18 - установить имя логического
xor ax,ax ; диска
ret
SET_LOGICAL ENDP
;
PAGE
; ------------ Подпрограммы обработки запросов -----------------------
; Эти подпрограммы вызываются для обработки параметров любого запроса
; на ввод/вывод.
; На входе :
; ES:DI - содержит адрес блока запроса
; Действия :
; Проверка параметра "номер сектора" на допустимость.
; Преобразование этого параметра в "сегмент:смещение".
; Выровнять счетчик для предотвращения "перекрытия".
; На выходе :
; DS:SI - содержит адрес "сектора" в RAM-диске
; ES:DI - содержит адрес блока запроса
; CX - содержит количество передаваемых слов.
;
verify PROC NEAR
; проверим,что номера начального и конечного секторов лежат в пределах
; от 0 до N.
mov cx,request.start ; сравним номер начального
cmp cx,bpb.nls ; сектора с количеством
jae out_of_range ; логических секторов
add cx,request.count ; найдем номер конечного
dec cx ; сектора и тоже сравним
cmp cx,bpb.nls ; если номера секторов
jb in_range ; нормальные то продолжим
; заданные секторы не содержатся на диске
out_of_range:
mov ax,ST_ERROR OR SECTOR_NOT_FOUND
mov request.count,0 ; ничего не было передано
stc ; возвращаемся с ошибкой
ret
; вычислим сегментный адрес начального сектора
in_range:
mov ax,bpb.bps ; количество байт в секторе
mov cl,4 ; разделим на 16 для получения
shr ax,cl ; размера в параграфах
- 6-64 -
mul request.start ; смещение параграфа относи-
; тельно начала диска
add ax,RPARA ; смещение параграфа относи-
mov dx,cs ; тельно CS
add ax,dx ; абсолютное смещ. параграфа
mov si,ax ; сохраним сегмент в SI
; вычислим и проверим счетчик передаваемых данных
mov ax,bpb.bps ; размер сектора в байтах
mul request.count ; счетчик передачи в байтах
cmp dx,0 ; проверим на корректность
jne out_of_range
; выровняем счетчик в AX для предотвращения перекрытия
mov cx,word ptr request.bufptr
cmp cx,0 ; смещение = 0
je set_size
neg cx ; остаток = 64K - смещение
cmp cx,ax ; буфера
jae set_size ; если остаток меньше счетчика,
mov ax,cx ; то передаем только остаток
; установим количество передаваемых секторов и счетчик передачи
set_size:
mov cx,ax ; счетчик передачи в байтах
shr cx,1 ; преобразуем в счетчик слов
div bpb.bps ; (DX был 0) кол-во секторов
mov request.count,ax ; сохраним счетчик передачи
; загрузим в DS:SI адрес блока в памяти
mov ds,si
xor si,si
; установим направление передачи и вернемся без ошибок
cld
clc
ret
verify ENDP
;
IFDEF DEBUG
INCLUDE biosio.asm
PAGE
;
; ************ КОД И ДАННЫЕ ДЛЯ ОТЛАДКИ ******************************
;
; Отладочные сообщения
;
NO_COMMAND_msg db 'NO COMMAND',CR,LF,'$'
INIT_msg db 'INITialization',CR,LF,'$'
MEDIA_CHECK_msg db 'MEDIA Check',CR,LF,'$'
BUILD_BPB_msg db 'Build BIOS Parameter Block',CR,LF,'$'
IOCTL_INPUT_msg db 'IO Control Input',CR,LF,'$'
READ_msg db 'Input from Device',CR,LF,'$'
READ_NOWAIT_msg db 'Nondestructive Input no-wait',CR,LF,'$'
INPUT_STATUS_msg db 'Input Status',CR,LF,'$'
INPUT_FLUSH_msg db 'Flush Input Queue',CR,LF,'$'
WRITE_msg db 'Output to Device',CR,LF,'$'
WRITE_VERIFY_msg db 'Output with Verify',CR,LF,'$'
OUTPUT_STATUS_msg db 'Output Status',CR,LF,'$'
OUTPUT_FLUSH_msg db 'Flush Output Queue',CR,LF,'$'
IOCTL_OUTPUT_msg db 'IO Control Output',CR,LF,'$'
DEVICE_OPEN_msg db 'Open a Device',CR,LF,'$'
- 6-65 -
DEVICE_CLOSE_msg db 'Close a Device',CR,LF,'$'
REMOVABLE_msg db 'Is Media Removable',CR,LF,'$'
GENERIC_IOCTL_msg db 'Generic IOCTL Request',CR,LF,'$'
GET_LOGICAL_msg db 'Get Logical Device',CR,LF,'$'
SET_LOGICAL_msg db 'Set Logical Device',CR,LF,'$'
;
PAGE
;
; ============= ТАБЛИЦА АДРЕСОВ ОТЛАДОЧНЫХ СООБЩЕНИЙ =================
;
message_table LABEL WORD
dw offset INIT_msg ; 01 - инициализация
dw offset MEDIA_CHECK_msg ; 02 - проверка носителя
dw offset BUILD_BPB_msg ; 03 - построить BPB
dw offset IOCTL_INPUT_msg ; 04 - ввод IOCTL
dw offset READ_msg ; 05 - ввод из устройства
dw offset READ_NOWAIT_msg ; 06 - неразруш. ввод без ожид.
dw offset INPUT_STATUS_msg ; 07 - ввод статуса
dw offset INPUT_FLUSH_msg ; 08 - сброс входной очереди
dw offset WRITE_msg ; 09 - вывод на устройство
dw offset WRITE_VERIFY_msg ; 10 - вывод с проверкой
dw offset OUTPUT_STATUS_msg ; 11 - вывод статуса
dw offset OUTPUT_FLUSH_msg ; 12 - сброс выходной очереди
dw offset IOCTL_OUTPUT_msg ; 13 - вывод IOCTL
dw offset DEVICE_OPEN_msg ; 14 - открыть устройство
dw offset DEVICE_CLOSE_msg ; 15 - закрыть устройство
dw offset REMOVABLE_msg ; 16 - носитель сменный ?
dw offset NO_COMMAND_msg ; 17 -
dw offset NO_COMMAND_msg ; 18 -
dw offset NO_COMMAND_msg ; 19 -
dw offset GENERIC_IOCTL_msg ; 20 - групповой IOCTL запрос
dw offset NO_COMMAND_msg ; 21 -
dw offset NO_COMMAND_msg ; 22 -
dw offset NO_COMMAND_msg ; 23 -
dw offset GET_LOGICAL_msg ; 24 - получить имя диска
dw offset SET_LOGICAL_msg ; 25 - установить имя диска
;
PAGE
; PRINT_COMMAND
;
; Эта процедура вызывает функцию BIOS для печати (_biosprt), передавая
; ей адрес строки, содержащей имя только что вызванной команды. При
; вызове этой процедуры удвоенный код команды передается в регистре BX.
; Все используемые регистры сохраняются.
;
print_command PROC NEAR
push ax ; сохраним содержимое рег. AX
mov ax, BLUE_F OR BRIGHT OR BLACK_B ; установим цвет
push ax
mov ax,word ptr message_table[bx] ; адрес строки
push ax
call _biosprt ; вызываем процедуру BIOS
add sp,4 ; очищаем стек от параметров
pop ax ; восстанавливаем AX и выходим
ret
print_command ENDP
ENDIF
- 6-66 -
