Файл: jourdain_spravochnik_programmista.docx

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 04.07.2020

Просмотров: 3082

Скачиваний: 1

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

мые вычисления.

Первые три байта FAT не используются для номеров кластеров.

Первый байт содержит код, определяющий тип диска (см. [1.1.5]), а

следующие 2 байта оба равны FFH. Поскольку эти позиции таблицы

заняты, то кластеры нумеруются, начиная с 2, причем кластеры 2 и

3 занимают вторую тройку байт таблицы.

MS DOS 3.0 может создавать FAT с записями размером 16 бит.

Такие записи необходимы для фиксированных дисков размером более

10M, которые имеют больше, чем 4086 кластеров. На рис. 5-1 пока-

зана связь между FAT и кластерами на диске.

Очень редко имеются причины вносить изменения прямо в таблицу

размещения файлов. MS DOS заботится обо всех файловых операциях и

обеспечивает процедуры, анализирующие таблицу на предмет наличия

свободного пространства на диске. Однако для некоторых специаль-

ных целей, таких как восстановление удаленных файлов или написа-

ние драйвера блочного устройства, необходим прямой доступ к FAT.

При прямом доступе к FAT надо соблюдать следующие правила.


Для нахождения следующего кластера файла:


1. Умножьте номер кластера на 1.5.

2. Прочитайте 2 байта с полученным смещением (окгругляя вниз).

3. Если номер кластера четный, то возьмите младшие 12 бит, иначе

возьмите старшие 12 бит.


Для преобразования номера кластера в логический номер сектора:


1. Вычтите 2 из номера кластера.

2. Умножьте результат на число секторов в кластере.


Высокий уровень.


В данном примере читается FAT и поределяется значение, храня-

щееся для кластера номер 6. В [5.4.2] объясняется начальный код,



читающий сектора FAT. Результатом является 12-битное число,

представленное в виде трех шестнадцатиричных цифр (4 бита каж-

дая), возвращаемое в виде строки. В примере пары чисел, состоящих

из двух цифр, объединены и в качестве результата берутся правые

или левые три цифры. Когда Бейсик преобразует символ в 16-ную

форму, то он возвращает только одну цифру, если первая была ну-

лем, поэтому удаленный ноль должен быть восстановлен, чтобы этот

метод работал правильно.


100 '''чтение секторов FAT

110 DEFINT A-Z

120 DATA &H55, &H8B, &HEC, &H1E, &H8B, &H76, &H0C, &H8B

130 DATA &H04, &H8B, &H76, &H0A, &H8B, &H14, &H8B, &H76

140 DATA &H08, &H8B, &H0C, &H8B, &H76, &H06, &H8A, &H1C

150 DATA &H8E, &HD8, &H8B, &HC3, &HBB, &H00, &H00, &HCD

160 DATA &H25, &H59, &H1F, &H5D, &HCA, &H08, &H00

170 DEF SEG = &H1000 'помещаем машинный код с этого адреса

180 FOR N = 0 TO 38 'читаем 39 байтов данных

190 READ Q: POKE N,Q 'переносим их в память

200 NEXT '

210 READSECTOR = 0 'начинаем процедуру с 1-го байта

220 BUFFER = &H2000 'адрес буфера приема данных

230 LOGICALNUMBER = 1 'начальные сектора FAT

240 NUMBERSECTORS = 2 '2 сектора в FAT

250 DRIVE = 0 'читаем накопитель A

260 CALL READSECTOR(BUFFER,LOGICALNUMBER,NUMBERSECTORS,DRIVE)

270 '''определяем номер следующего кластера файла

280 DEF SEG = &H2000 'буфер, где хранится FAT

290 CLUSTERNUMBER! = 6 'кластер номер 6

300 C! = CLUSTERNUMBER! 'делаем копию

310 C! = INT (C!*1.5) 'умножаем на 1.5 и округляем

320 X = PEEK(C!) 'читаем 2 байта с этой позиции

330 Y = PEEK(C!+1) '

340 X$ = HEX$(X): Y$ = HEX$(Y) 'переводим в 16-ные строки


350 IF LEN(X$) = 1 THEN X$ = "0"+X$ 'делаем из 2-символьными

360 IF LEN(Y$) = 1 THEN Y$ = "0"+Y$ '

370 H$ = Y$ + X$ 'объединяем числа в одну строку

380 '''проверяем кластер на четность

390 IF CLUSTERNUMBER! MOD 2 <> 0 THEN 420 'уход, если нечетный

400 NEXTCLUSTER$ = RIGHT$(H$,3) 'если четный, то правые 3 цифры

410 GOTO 430

420 NEXTCLUSYER$ = LEFT$(H$,3) 'если нечетный, то левые

430 PRINT NEXTCLUSTER$ 'печатаем результат


Средний уровень.


Функция DOS 1CH дает информацию о таблице размещения файлов,

но не дает саму FAT. Поместите номер накопителя в DL, где 0 =

накопитель по умолчанию, 1 = A, и т.д. При возврате DX содержит

число кластеров в FAT, а CX - число байтов в секторе. DS:BX ука-

зывает на байт, содержащий первый байт FAT, т.е. на код, указы-

вающий тип диска; эти коды перечислены в [1.1.5].



Низкий уровень.


Намного легче получить доступ к FAT в языке ассемблера. Отме-

тим, что умножение номера кластера на 1.5 производится копирова-

нием числа, сдвигом копии вправо на 1 бит для деления пополам и

сложением копии с оригиналом. Этот метод автоматически окгруляет

результат вниз. Код, считывающий сектора FAT в память, обсуждает-

ся в [5.4.2].


;---в сегменте данных

BUFFER DB 1024 DUP(0) ;отводим место для 2 секторов


;---читаем FAT в память

LEA BX,BUFFER ;указываем на буфер данных

MOV DX,1 ;логический номер сектора

MOV CX,2 ;2 сектора

MOV AL,0 ;накопитель A

INT 25H ;читаем сектора

POP CX ;восстанавливаем стек

;---получаем номер кластера

MOV AX,3 ;номер кластера в AX

MOV CX,AX ;делаем копию

MOV DX,AX ;делаем вторую копию

SHR DX,1 ;делим вторую копию на 2

ADD CX,DX ;складываем между собой

ADD BX,CX ;добавляем как смещение

MOV DX,[BX] ;получаем 2 байта из этого места

TEST AX,1 ;номер кластера нечетный?

JNZ ODD_CLUSTER ;уход, если да

AND DX,0000111111111111B ;получаем номер

JMP SHORT CONTINUE ;уход через обработку нечетного

ODD_CLUSTER: MOV CL,4 ;подготовка к сдвигу вправо

SHR DX,CL ;сдвигаем вниз старшие 12 битов

CONTINUE:



5.1.2 Определение доступного дискового пространства.




Хотя в следующем подразделе объянено как восстановить ситуаци-

цию при ошибке из-за нехватки места на диске, но нет лучшего

лекарства, чем предусмотрительность. Программа должна контролиро-

вать доступное дисковое пространство и сообщать пользователя о

нехватке места. Если места не хватает, то пользователь может

выйти из программы и устранить проблему без потери информации.


Высокий уровень.


Следующая ассемблерная подпрограмма возвращает в переменную

CLUSTERS число свободных кластеров на указанном диске. Надо по-

местить номер накопителя в DRIVENUM, где 1 = A, 2 = B и т.д. В

приложении Г объясняется как ассемблерные подпрограммы включаются

в программы на Бейсике.



10 DEFINT A-Z 'используем целые переменные

20 DRIVENUM = 1 'сюда помещаем номер накопителя

30 CLUSTERS = 0 'инициализируем переменную

40 DATA &H55, &H8B, &HEC, &H8B, &H76, &H06, &H8B

50 DATA &H14, &HB4, &H36, &HCD, &H21, &H8B, &H7E


60 DATA &H08, &H89, &H1D, &H5D, &HCA, &H04, &H00

70 DEF SEG = &H1000 'помещаем подпрограмму

80 FOR N = 0 TO 20 'берем каждый байт

90 READ Q: POKE N,Q 'читаем его и помещаем в память

100 NEXT '

110 FREESPACE = 0 'указатель на начало процедуры

120 CALL FREESPACE(CLUSTERS,DRIVENUM) 'вызов процедуры

130 PRINT "CLUSTERS: ";CLUSTERS 'печать числа кластеров


Средний уровень.


Функция 36H прерывания 21H сообщает сколько имеется свободного

пространства на диске. Единственный входной регистр DL, который

должен содержать номер накопителя. Накопитель по умолчанию обоз-

начается 0, накопитель A - 1 и т.д. При возврате BX содержит

число доступных кластеров, AX - число секторов в кластере, а CX -

количество байт в секторе. Небольшое упражнение в умножении дает

желаемый результат. В следующем примере проверяется, что на

двухсторонней дискете осталось по меньшей мере 2K дискового

пространства:


MOV AH,36H ;номер функции

MOV DL,1 ;накопитель A

INT 21H ;получаем информацию

CMP BX,2 ;имеется ли 2 свободных кластера?

JL RUNNING_OUT ;если нет, то сообщаем об этом



5.1.3 Получение/установка размера файла.




Программа может пожелать проверить размер файла по разным

причинам. Одна из возможных причин состоит в определении числа

записей, содержащихся в файле. Другая - в определении позиции

конца файла, с тем чтобы файловый указатель был установлен верно

для добавления в файл новых данных, без изменения существующих.

Конечно, размер файла устанавливается автоматически функцией

DOS. Иногда программа может нуждаться в резервировании дискового

пространства для дальнейшего использования. В этом случае надо

открыть файл в режиме прямого доступа и записать такой номер

записи, чтобы файл имел достаточную длину. Записи между "фиктив-

ной" и реально относящимися к файлу будут заполнены теми данными,

которые случайно окажутся в дисковых секторах, отведенных для

файла при этой операции.


Высокий уровень.


В Бейсике функция LOF (длина файла) возвращает точное число

байтов, отведенных файлу (предупреждаем, однако, что старые вер-

сии Бейсика - 1.х - возвращают число 128-байтных блоков, исполь-



зуемых файлом). Файл должен быть открыт и ссылаться на него надо

по номеру, под которым был открыт файл. Формат X = LOF(1). В

следующем примере определяется сколько 64-байтных записей содер-

жится в файле, открытом как #3:


100 OPEN "FILENAME" AS #3 'открываем файл

110 RECORDLEN = 64 'определяем длину записи

120 NUMBREC = LOF(3)/RECORDLEN 'вычисляем число записей


Средний уровень.


FCB функция 23H прерывания 21H сообщает число записей в файле.

Если приписать файлу длину записи в 1 байт, то его размер будет

возвращен в байтах. DS:DX должны указывать на управляющий блок

открытого файла. Затем вызовите функцию. Если файл не найден, то

в AL возвращается FF. В противном случае в AL возвращается 0, а

число записей помещается в поле номера записи прямого доступа FCB


(байты 33-36). Для правильной работы поле длины записи FCB должно

быть установлено после открытия файла, но перед вызовом функции;

это двухбайтное поле расположено по смещению 14 в FCB. Если раз-

мер файла неточно делится на длину записи, то сообщаемое число

записей округляется вверх. Вот пример, в котором используется

длина записи равная 1:


;---определение размера файла

LEA DX,FCB ;DS:DX указывает на FCB

MOV BX,DX ;копируем указатель в BX

MOV CX,1 ;размер записи в CX

MOV [BX]+14,CX ;пишем в поле размера записи FCB

MOV AH,23H ;функция сообщающая размер файла

INT 21H ;вызов функции

MOV AX,[BX]+33 ;получаем младшую часть размера файла

MOV CX,[BX]+35 ;получаем старшую часть размера файла


Можно также устанавливать длину файла, используя управляющие

блоки файла. Для этого надо использовать функцию записи блока с

прямым доступом, которая обсуждается в [5.4.5]. У этой функции

имеется частный случай, когда число записанных записей устанавли-


вается равным нулю, то длина файла устанавливается равной числу

записей, указанному в поле записи прямого доступа.

Метод, использующий дескриптор файла (file handle) не имеет

функции, которая непосредственно сообщала бы длину файла, однако

имеется возможность вычислить размер, передвинув указатель файла

с начала на конец файла. При открытии файла указатель файла авто-

матически устанавливается на первый байт файла. Указатель файла

перемещается функцией 42H прерывания 21H. Надо поместить в AL

кодовое число 2, напраляющее указатель на конец файла. В BX дол-

жен быть указан номер файла, а CX:DX содержит смещение от конца

файла до позиции, в которую должен быть установлен указатель,

поэтому поместите 0 в оба этих регистра. Затем вызовите функцию.

При возврате DX:AX будет содержать новую позицию указателя, отно-

сительно его предыдущей позиции - т.е. будет содержать длину



файла (DX содержит старший байт). При возникновении ошибки будет

установлен флаг переноса, а в AX будет возвращено 1, если непра-

вилен номер функции и 6, если неправилен номер файла. Не забудьте

затем снова вернуть указатель на начало файла, если это необходи-

мо. Поместите 0 в AL, CX и DX и вызовите функцию снова. Вот при-

мер:


;---открываем файл

LEA DX,FILE_PATH ;DS:DX указывают на путь файла

MOV AL,0 ;открываем для чтения

MOV AH,3DH ;функция открытия файла

INT 21H ;открываем его

JC OPEN_ERROR ;проверка на ошибку

MOV HANDLE,AX ;запоминаем номер файла

;---определяем длину файла

MOV AH,42H ;функция перемещения указателя

MOV AL,2 ;код установки на конец файла

MOV BX,HANDLE ;номер файла в BX

MOV CX,0 ;0 в CX и DX

MOV DX,0 ;

INT 21H ;сдвигаем указатель

JC POINTER_ERROR ;ошибка?

MOV FSIZE_HIGH,DX ;запоминаем размер файла

MOV FSIZE_LOW,DX ;



5.1.4 Восстановление после ошибок, связанных с нехваткой

пространства на диске.




При попытке записи на полный диск может произойти крах прог-


раммы. Часто легко избежать этого, даже в Бейсике, проверив пред-

варительно наличие дискового пространства [5.1.2]. Однако, если

ошибка произошла, то постарайтесь дать пользователю возможность

исправить ее. Позвольте ему сохранить только часть данных или

стереть какой-нибудь другой файл и повторить попытку. Или, еще

более радикальное средство, позвольте пользователю вставить дру-

гую дискету. Последний подход должен реализовываться с большой

осторожностью. Сначала закройте все открытые файлы. Затем выдайте

запрос на смену дискеты. После того, как пользователь сообщит,

что новая дискета на месте, создайте новый файл и запишите туда

данные.


Высокий уровень.


В Бейсике надо установить процедуру обработки ошибок, как

показано в [7.2.5]. Если оператор Бейсика делает попытку писать

на полный диск, то возвращается код ошибки #61. При этом управле-

ние может быть передано процедуре обработки ошибок, которая ин-

формирует пользователя о проблеме и позволяет ему справиться с

ней, не теряя данных.



100 ON ERROR GOTO 5000 'разрешаем обработку ошибок

.

.

200 OPEN FNAME$ FOR OUTPUT AS #1 'открываем файл

210 FOR N = 1 TO ARRLEN 'начинаем писать массив на диск

220 PRINT #1, ARRAY$(N) 'записываем один элемент

230 NEXT '

.

.

5000 IF ERR = 61 THEN 5100 'диск полон?

5100 IF ERR = ... 'другие ошибки ...

.

5100 '''восстановление при переполнении диска

5110 BEEP: PRINT "Disk full - choose an option:"

5120 PRINT "(A) - Re-edit the file"

5130 PRINT "(B) - Delete some other file from disk"

5140 PRINT "(C) - Use different diskette"

. (здесь идет процедура восстановления)

.

5500 RESUME


Средний уровень.


Все функции DOS, которые пишут на диск, выдают определенный

код ошибки при попытке записи на полный диск. Вот сводка этих

кодов:


Метод доступа Функция Название Код ошибки


FCB 15H Последовательная запись AL = 1

FCB 22H Прямая запись AL = 1

FCB 27H Прямая запись блока AL = 1

Дескриптор 40H Запись в файл/устройство CX <> BX


Проверяйте эти ошибочные условия после каждой записи на диск.

Поскольку критической ошибки не происходит, то восстановление не

вызывает проблем. Надо только проверять на ошибку каждый раз

когда Вы вызываете одну из этих функций и создать хорошую проце-

дуру обработки ошибок по Вашему вкусу.



Раздел 2. Работа с каталогами диска.




Каждый диск имеет один корневой каталог, с которого начинается

поиск всех остальных каталогов. Корневой каталог может содержать

элементы, указывающие на подкаталоги, которые в свою очередь

могут содержать ссылки на другие подкаталоги, образуя древовидную

структуру каталогов. Корневой каталог всегда расположен в опреде-

ленных секторах диска; подкаталоги хранятся как обычные дисковые

файлы, поэтому они могут быть расположены в любом месте диска.

Отметим, что фиксированный диск может содержать до четырех корне-

вых каталогов, если он разбит на разделы, хотя MS DOS "видит"

только один корневой каталог. Каталоги могут иметь различные