DRIV_1 (663652), страница 2

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 2)

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 ; размера в параграфах

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 ax,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,'$'

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

;

PAGE

;

;** ВНУТРЕННИЙ СТЕК И КОНЕЦ ОПЕРАЦИОННОЙ ЧАСТИ ДРАЙВЕРА **

;

db 32 DUP ('stack ') ; внутренний стек глубиной

local_stack EQU $ ; 256 байт

;

bpb_tab dw offset bpb ; указатель на BPB

;

LAST_USED EQU $ ; адрес завершения

;

;*** ХАРАКТЕРИСТИКИ RAM-ДИСКА, ПРИНИМАЕМЫЕ ПО УМОЛЧАНИЮ ***

;

; Параметры для 5-1/4" двустороннего двойной плотности диска с девятью

; секторами на дорожке.

;

MTYPE EQU 0FDh ; байт описателя носителя

TRACKS EQU 40 ; 40 дорожек

SECTORS EQU 9 ; 9 секторов на дорожке

DSIZE EQU 512 ; 512 байт в секторе

SIDES EQU 2 ; 2 стороны на диске

;

FSECS EQU 2 ; количество секторов в FAT

DIREN EQU 112 ; количество элементов директория

DSECS EQU 7 ; 7 секторов в директории

CLSIZ EQU 2 ; 2 сектора в кластере

;

STOTAL EQU TRACKS*SECTORS*SIDES ; всего секторов

PTOTAL EQU (DSIZE/16)*STOTAL ; всего параграфов

;

; ******** НАЧАЛО ОБЛАСТИ ДАННЫХ RAM-ДИСКА **********

;

; RAM-диск д.б. выровнен на границу параграфа

;

IF ($-ORIGIN) mod 16

ORG ($-ORIGIN) + 16 - (($-ORIGIN) mod 16)

ENDIF

RDISK LABEL BYTE ; начало RAM-диска

RPARA EQU ($-ORIGIN)/16 ; размер кода в параграфах

;

; ------------ Блок параметров BIOS ----------------------------------

;

jmp short boot ; короткий JMP (2 байта)

nop ; требуется для boot_record

db 'IBM 3.1' ; 8 байт имя и версия

;

bpb bpbstrc

dw SECTORS ; количество секторов на дорожке

dw SIDES ; количество головок чтения/записи

dw 0 ; количество скрытых секторов

boot:

db (DSIZE-30) DUP (?) ; остаток boot_sector

;

; ------------ Таблицы размещения файлов (FAT) -----------------------

; ; первые два элемента FAT

FAT_1 db MTYPE,0FFh,0FFh ; нулевой остаток FAT

db (DSIZE-3) DUP (0)

db ((FSECS-1) * DSIZE) DUP (0)

FAT_2 db MTYPE,0FFh,0FFh ; первые два элемента FAT

db (DSIZE-3) DUP (0) ; нулевой остаток FAT

db ((FSECS-1) * DSIZE) DUP (0)

;

; ------------ Сектора директория ------------------------------------

;

DIREC db 'RAM_DISK ' ; имя тома (11 байт)

db 08h ; VID

db 10 DUP (?) ; зарезервировано

dw 0600h ; время 12:00:00 (полдень)

dw 021h ; дата 1 января 1980 года

dw 0 ; начальный кластер 0

dd 0 ; размер файла 0

db (DSIZE-32) DUP (0) ; нулевой остаток директория

db ((DSECS-1) * DSIZE) DUP (0)

BUFFER LABEL BYTE ; начало области данных

;

; ************ ПРОЦЕДУРА ИНИЦИАЛИЗАЦИИ **************

;

INCLUDE stdmac.inc

;

; ============ Область данных инициализации ===========

;

$signon db 'RAM DISK Driver Version 1.00 Installed: Drive

$desig db 'A'

$crlf db 0Dh,0Ah,'$'

;

; ============ Начало процедуры инициализации ===========

;

INIT PROC NEAR ; 00 - инициализация

;

; установим адрес завершения, количество устройств и указатель на

; таблицу BPB

;

mov request.endadro,0 ; адрес конца драйвера

mov request.endadrs,cs

add request.endadrs,(RPARA+PTOTAL) ; последний параграф

mov request.units,1

mov request.bpbtabo,offset bpb_tab

mov request.bpbtabs,cs

mov al,$desig ; скорректируем имя диска

add al,request.devnum

mov $desig,al

;

; вывод на экран идентификационной строки

@DisStr $signon

;

; скорректируем значение "max_cmd" исходя из версии MS-DOS

@GetDOSVersion ; получим номер версии MS-DOS

cmp al,3 ; MS-DOS версии 3.00 и выше ?

jb init_done ; нет - прекращаем инициализацию

mov [max_cmd],CMD_PRE_32 ; команды для MS-DOS 3.00

cmp ah,2 ; MS-DOS версии 3.20 и выше ?

jb init_done ; нет - прекращаем инициализацию

mov [max_cmd],CMD_32 ; команды для MS-DOS 3.20

;

init_done:

xor ax,ax ; нет проблем !

ret

INIT ENDP

;

; ************ КОНЕЦ ДРАЙВЕРА. КОНЕЦ ФАЙЛА ************

;

_TEXT ENDS

END

Список используемой литературы

стр. 18 из 18

Характеристики

Список файлов реферата