北京理工大学汇编语言实验六磁盘文件存取实验报告.docx

第六章磁盘文件存取实验（设计性实验）
一、实验要求和目的
1． 理解文件、目录的概念；
2． 了解 FCB(文件控制块)方式文件管理方法；
3． 掌握文件代号式文件存取方式；
4． 学习使用文件指针读取文件
二、软硬件环境
1． 硬件环境：计算机系统 windows；
2． 软件环境：装有 MASM、DEBUG、LINK、等应用程序。
三、实验涉及的主要知识单元
DOS功能调用中断（INT 21H）提供了两类磁盘文件管理功能，一类是FCB(文
件控制块)方式，另一类是文件代号式存取方式。
对于文件的管理，实际上是对文件的读写管理， DOS 设计了四种存取文件
方式：顺序存取方式、随机存取方式、随机分块存取方式和代号法存取方式。
文件的处理步骤
A） 写之前必须先建立文件、读之前必须先打开文件。
B） 写文件之后一定要关闭文件。通过关闭文件，使操作系统确认此
文件放在磁盘哪一部分，写后不关闭会导致写入文件不完整。
1、文件代号式存取方式：
当用户需要打开或建立一个文件时，必须提供文件标识符。文件标识符用
ASCII Z 字符串表示。ASCII Z 字符串是指文件标识符的ASCII 字符串后面再加
1 个“0”字符。文件标识符的字符串包括驱动器名、路径名和文件名。其格式
为
[d:][path]filename[.exe]
其中d 为驱动器名，path 为路径名，.exe 为文件名后缀。
中断 21H 提供了许多有关目录和文件操作的功能，其中文件代号式存取方式
常用的功能如下：
2、操作目录的常用功能
39H——创建目录 3BH——设置当前目录
3AH——删除目录 47H——读取当前目录
有关中断功能的详细描述和调用参数在此从略，需要查阅者可参阅相关资料
之目录控制功能。
3、用文件句柄操作文件的常用功能
3CH——创建文件 4EH——查找到第一个文件
3DH——打开文件 4FH——查找下一个文件
3EH——关闭文件 56H——文件换名
3FH——读文件或设备 57H——读取/设置文件的日期和时间
40H——写文件或设备 5AH——创建临时文件
41H——删除文件 5BH——创建新文件
42H——设置文件指针 67H——设置文件句柄数(最多文件数)
43H——读取/设置文件属性 6CH——扩展的打开文件功能
有关中断功能的详细描述和调用参数在此从略，需要查阅者可参阅相关资料
之文件操作功能。下面简单介绍几种常用的功能：
（1）．建立文件（3CH）
功能：按指定文件名建立文件。
入口参数：（AH）＝3CH，DS：DX 指向ASCII Z 字符串的段地址和偏移地址，
（CX）＝文件属性。
出口参数：若操作成功，则CF＝0，（AX）＝文件代号；
若操作失败，则CF＝1，（AX）＝错误代码。
（2）．打开文件（3DH）
功能：打开由ASCII Z 串指定的文件。
入口参数：（AH）＝3DH，DS：DX 指向ASCII Z 字符串的段地址和偏移地址，
（AL）＝存取方式代码（0：读文件，1：写文件，2：读、写文件）。
出口参数：若操作成功，则CF＝0，（AX）＝文件代号；
若操作失败，则CF＝1，（AX）＝错误代码。
（3）．关闭文件（3EH）
功能：关闭文件代号指定的文件。
入口参数：（AH）＝3EH，（BX）＝文件代号。
出口参数：若操作成功，则CF＝0；
若操作失败，则CF＝1，（AX）＝错误代码。
（4）．读文件（3FH）
功能：按文件代号读取文件。
入口参数：（AH）＝3FH，（BX）＝文件代号，（CX）＝要读取的字节数；
DS：DX 指向接收数据缓冲区的段地址和偏移地址。
出口参数：若操作成功，则CF＝0，（AX）＝实际读入字节数，（AX）＝0，
文件结束；
若操作失败，则CF＝1，（AX）＝错误代码。
（5）．写文件（40H）
功能：按文件代号写文件。
入口参数：（AH）＝40H，（BX）＝文件代号，（CX）＝要写入的字节数；
DS：DX 指向存放写入信息数据缓冲区的段地址和偏移地址。
出口参数：若操作成功，则CF＝0，（AX）＝写入字节数；
若操作失败，则CF＝1，（AX）＝错误代码。
（6）．移动文件指针（42H)
功能：移动由文件代号标志的文件读写指针的位置
入口参数:在bx 预置文件代号，在cx:dx 双字中预置移动位移量，在 al 中
预置移动方式移动方式：
00h 移动后文件指针值=0+移动位移量
01h 移动后文件指针值=当前文件指针值+移动位移量
02h 移动后文件指针值=文件尾值+移动位移量
出口参数：CF=0 表示移动成功，此时CX:DX 双字中返回移动后文件指针值；
CF=1 表示移动失败，此时AX 中返回值为1 表示移动方式无效，为6 表示无效的
文件代号。
（7）．取/置文件属性（43H）
功能：按文件代号写文件。
入口参数：（AH）＝43H，DS：DX 指向ASCII Z 串的段地址和偏移地址。
（AL）＝0，取文件属性，（AL）＝1，置文件属性；
置文件属性时，（CX）＝新文件属性（低字节）。
出口参数：若操作成功，则CF＝0，若为取属性，（CX）＝文件属性；
若操作失败，则CF＝1，（AX）＝错误代码。
用FCB 操作文件的常用功能和磁盘绝对读写中断请参阅相关资料，不作要
求。
四、实验内容与步骤（文件代号式存取方式）
1、编写一个创建子目录的程序，具体要求如下：
1)用键盘输入一个目录路径名，若输入的字符串为空，则程序运行结束；
2)若目录创建成功，显示成功信息，否则，显示创建失败信息。
·流程图如下：

·源代码如下：
data segment
handle dw ?
msg1 db 'Please input the directory route:', 0dh, 0ah, '$'
msg2 db 0dh, 0ah, 'Error: create directory failed!', 0dh, 0ah, '$'
msg3 db 0dh, 0ah, 'Create directory successful!', 0dh, 0ah, '$'
dirn_buf db 64
db ?
dirn_str db 64 dup(0)
data ends
code segment
assume cs:code, ds:data
start:
mov ax, data
mov ds, ax
lea dx, msg1
mov ah, 09h
int 21h ;;输出提示信息
lea dx, dirn_buf
mov ah, 0ah
int 21h
mov bl, [dirn_buf+1]
mov bh, 0
mov dirn_str[bx], 0 ;;输入目录路径，将串尾回车更换为00
cmp byte ptr [dirn_buf+1], 0
jz exit ;;输入为空， 直接退出
lea dx, dirn_str
mov cx, 00h
mov ah, 39h
int 21h ;;创建目录
jc error ;;错误
mov handle, ax ;;保存文件代号
lea dx, msg3
mov ah, 09h
int 21h ;;输出成功信息
mov bx, handle
mov ah, 3eh
int 21h ;;关闭文件
jmp exit
error:
lea dx, msg2 ;;输出错误信息
mov ah, 09h
int 21h
exit:
mov ax, 4c00h
int 21h
code ends
end start
·运行结果如下：

此时已经成功在G盘下创建abc文件夹
2、编写一个创建文件的程序，其要求如下：
1)用键盘输入文件名(可包含路径)，若输入的字符串为空，则程序运行
结束；
2)若目录创建成功，显示成功信息，否则，显示创建失败信息；
·流程图如下：

·源代码如下：
data segment
handle dw ?
msg1 db 'Please input the file route:', 0dh, 0ah, '$'
msg2 db 0dh, 0ah, 'Error: create file failed!', 0dh, 0ah, '$'
msg3 db 0dh, 0ah, 'Create file successful!', 0dh, 0ah, '$'
msg4 db 0dh, 0ah, 'Error: write file failed!', 0dh, 0ah, '$'
msg5 db 0dh, 0ah, 'Please input 20 characters:', 0dh, 0ah, '$'
fn_buf db 64
db ?
fn_str db 64 dup(0)
wf_buf db 64
db ?
wf_str db 64 dup(0)
data ends
code segment
assume cs:code, ds:data
start:
mov ax, data
mov ds, ax
lea dx, msg1
mov ah, 09h
int 21h ;;输出提示信息
lea dx, fn_buf
mov ah, 0ah
int 21h
mov bl, [fn_buf+1]
mov bh, 0
mov fn_str[bx], 0 ;;输入文件路径，串尾回车用00代换
cmp byte ptr [fn_buf+1], 0
jz exit ;;输入为空，直接退出
lea dx, fn_str
mov cx, 00h
mov ah, 3ch
int 21h ;;创建文件
jc error ;;失败退出
mov handle, ax
lea dx, msg3
mov ah, 09h
int 21h ;;保存文件代号，输出成功信息
lea dx, msg5
mov ah, 09h
int 21h ;;输出提示信息
lea dx, wf_buf
mov ah, 0ah
int 21h ;;从键盘输入串
lea dx, wf_str
mov bx, handle
mov cl, byte ptr [wf_buf+1]
mov ch, 0
mov ah, 40h
int 21h ;;将串写入到刚创建的文件
jc wf_error
mov bx, handle
mov ah, 3eh
int 21h ;;关闭文件
jmp exit
error:
lea dx, msg2
mov ah, 09h
int 21h
jmp exit ;;创建失败
wf_error:
lea dx, msg4
mov ah, 09h
int 21h ;;写文件失败
exit:
mov ax, 4c00h
int 21h
code ends
end start
·运行结果如下：

在磁盘路径下搜索，可以看见如下内容：

证明程序代码正确
3)从键盘输入20 个字符存放到新建立的文件中。
3、利用文件句柄将两个文件合并成一个文件要求： 1）在第一个文件末
尾处换行回车，插入“The second file as follow:”; 2）换行回车，把第二个文件
内容存放在后面。
·流程图如下：

·源代码如下：
DATA SEGMENT
SFILE DB 40,41 DUP(?)
DFILE DB 40,41 DUP(?)
ASK1 DB 0AH,0DH,'INPUT SOURCE FILE:$'
ASK2 DB 0AH,0DH,'INPUT DEST FILE:$'
WRITE DB 0AH,0DH,'the second file as follow:',0AH,0DH
COUNTX EQU $-WRITE
ERR1 DB 0AH,0DH,'CREATE FILE ERROR:$'
ERR2 DB 0AH,0DH,'OPEN FILE ERROR:$'
ERR3 DB 0AH,0DH,'READ FILE ERROR:$'
ERR4 DB 0AH,0DH,'WRITE FILE ERROR:$'
ERR5 DB 0AH,0DH,'CLOSE FILE ERROR:$'
ERR6 DB 0AH,0DH,'DISK FULL ERROR:$'
BUFR DW ?
BUFFER DB 512 DUP(0)
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA
HANDLE PROC FAR
MOV AX,DATA;20
MOV DS,AX
MOV ES,AX
LEA DX,ASK1
MOV AH,9
INT 21H
LEA DX,SFILE
CALL INPUT
MOV CL,SFILE+1
MOV CH,0
MOV SI,CX
MOV SFILE[SI+2],0
LEA DX,SFILE+2
MOV AH,3DH
MOV AL,2
INT 21H
JNC MFH
OERR: LEA DX,ERR2
ERR: MOV AH,9
INT 21H
MOV AH,4CH;40
INT 21H
MFH: MOV BX,AX
MOV BUFR,AX
MOV CX,0
MOV DX,0
MOV AL,2
MOV AH,42H
INT 21H
JNC NEXT
DEC DX
NEXT: MOV CX,DX
MOV DX,AX
MOV AL,0
MOV AH,42H
INT 21H
LEA DX,ASK2
MOV AH,9
INT 21H
LEA DX,DFILE;60
CALL INPUT
MOV CL,DFILE+1
MOV CH,0
MOV SI,CX
MOV DFILE[SI+2],0
LEA DX,DFILE+2
MOV AH,3DH
MOV AL,0
INT 21H

MOV CX,COUNTX
INC CX
CALL INPUTX
MOV CL,DFILE+1
MOV CH,0
MOV SI,CX
MOV DFILE[SI+2],0
LEA DX,DFILE+2
MOV AH,3DH
MOV AL,0
INT 21H

JNC RFILE
JMP OERR
RFILE: MOV BX,AX
RFILE1: LEA DX,BUFFER;73
MOV CX,1024
MOV AH,3FH
INT 21H
JNC WFILE
LEA DX,ERR3
JMP ERR
WFILE: OR AX,AX
JZ EXIT
MOV CX,AX
LEA DX,BUFFER
XCHG BX,BUFR
MOV AH,40H
INT 21H
JNC R_W
LEA DX,ERR4
JMP ERR
CMP AX,CX
JE R_W
LEA DX,ERR6
JMP ERR
R_W: XCHG BX,BUFR
JMP RFILE1
EXIT: MOV AH,3EH
INT 21H
JNC EXIT1
EXIT0: LEA DX,ERR5
JMP ERR
EXIT1: XCHG BX,BUFR
MOV AH,3EH
INT 21H
JC EXIT0
MOV AH,4CH
INT 21H
HANDLE ENDP
INPUT PROC
MOV AH,0AH
INT 21H
RET
INPUT ENDP

INPUTX PROC
LEA DX,WRITE
MOV AH,40H
INT 21H
RET
INPUTX ENDP

CODE ENDS
END HANDLE

·运行结果如下：
现在g:\abc文件夹下游两个txt文件a.txt和b.txt，里面分别有字符串hello和world

运行后

结果为：
证明源代码运行成功
五、实验要求与提示
1、实验要求
（1）列出程序清单，加上适量注释；
（2）回答思考问题；
(3) 完成实验报告（实验材料上的内容简写，自己的工作要详尽）。
六、思考与练习以及测评标准
1．有兴趣的同学考虑用子程序方法实现上述实验内容；
2．文件在使用之前为何要打开？使用后为何要关闭？怎样计算文件的长度
和移动文件的读写指针？
答：只有打开文件才能获得文件代号，后续对该文件的读写操作及关闭均需要这个文件代号。
移动文件指针（42H) 功能：入口参数:在 bx 预置文件代号，在 cx:dx 双字中预置移动位移量，在 al 中预置移动方式移动方式：
00h 移动后文件指针值=0+移动位移量
01h 移动后文件指针值=当前文件指针值+移动位移量
02h 移动后文件指针值=文件尾值+移动位移量
出口参数：CF=0 表示移动成功，此时 CX:DX 双字中返回移动后文件指针值； CF=1 表示移动失败，此时 AX 中返回值为 1 表示移动方式无效，为 6 表示无效的文件代号。故要计算文件长度时，只需在AL中添02h,并指定cx, dx均为0，则移动后，dx：ax即指示文件尾，这个值就是文件的长度。