汇编语言命令参数程序的编写
一、 引言:
如果大家用过TurboC2.0/3.0 or BorlandC3.X等编译器编写DOS应用程序的话,编写一个命令行参数形式的应用程序对大家来说是一件非常容易的事情,只要在主函main()中加几个参数就OK(int main(int argc,char *argv[],char *env[]){})。相对汇编语言来说编写一个命令行参数的程序就比较艰难,它要用到DOS的程序段前缀PSP(Program Segment Prefix)知识以及其他相关DOS知识。(本文只对参数介绍,环境块不作讨论)
二、相关知识:
在DOS的提示符下键入一个命令(内/外部命令)或程序的名字,DOS SHELL(COMMAND.COM)首先根据名字判别其是内部命令还是外部命令或用户程序,若是内部命令则调用COMMAND.COM暂驻在内存中的部分的DOS内部命令代码,若是外部命令或用户程序,DOS SHELL则在当前目录和搜索路径中搜索匹配的文件名,找到了就加载程序,加载出错显示错误信息,找不到则显示Bad command or file name。
用户载DOS提示符下输入一串字符串,DOS SHELL把以回车(0Dh)为结束的这以字符串作为一个命令和参数进行解释,第一个空格以前的字符串为命令名(必须符合DOS命名规则),第一个空格(包括空格)到回车之间的字符作为命令或程序的参数。
程序段前缀--PSP是DOS加载一个外部命令或用户程序(扩展名为COM or EXE)时,在程序段前设置一个以节为边界,固定长度为10H(即256字节,一节为16字节)的存储块,PSP和程序段共有一个内存控制块(MCB),PSP位于每个程序的开始部分,无论是COM还是EXE,PSP的数据结构是相同的。PSP是程序与DOS的接口,DOS利用PSP管理进程,DOS用户进程指的是一个已被装入内存的可执行程序或已被调入内存但未执行的程序,COMMAND.COM是一个最早被装入内存的程序,因而可被看作祖先进程,外部命令或用户程序作为子进程,被DOS通过INT 21H的4BH号子功能来加载。用户程序也可以通过INT 21H的4BH号子功能调用来加载自己的子进程,控制子进程的执行,并通过4DH号子功能调用获取子进程的运行状况。
PSP中存有许多关于程序启动、执行、结束以及进程调度、进程环境地址和进程标志等重要信息。程序利用PSP还可以控制父子进程间的通信。至于PSP的数据结构的详细内容请参考有关书籍,本文不详细给出。
DOS加载一个COM或EXE程序时,段寄存器DS,ES都指向PSP段址(PSP段址是进程的唯一标志符),而不是指向程序的数据段和附加段。COM文件的CS,SS也指向PSP的段址。EXE文件的CS,SS,IP和SP需要进行重定位。
DOS加载一个外部命令或用户程序时,把文件名之后到回车符之间的字符串,最多可达127个字符作为参数,并把这些字符串送到PSP位移81H开始的区域,位移80H的一个字节存放参数字符串长度(回车符不算在内)。大家可用DEBUG.EXE加载一个带参数的程序,然后用D DS:80子命令查看加载程序的参数。命令行参数一般以空格(20H)为开始,回车符(0DH)为结束,但命令行中的重定向,管道符以及有关信息不作为参数传递给PSP。
三、示例程序:
本例程序PARATEST.ASM在没有参数(参数为一连串空格也视为无参数)的情况下显示提示信息,程序以字符'/'作为参数的标志,'/'后的字符是参数,根据不同的参数显示不同的字符串,并忽略'/'前的空格。程序还把非法参数显示出来,由于程序中保存参数的单元只设了两BYTES,如果字符'/'后的第一格字符是合法参数,程序不管字符'/'后有多少个字符都认为是合法的。
顺便介绍一个汇编编程的技巧,文后附带的示例源程序(PARATEST.ASM)中的DEBUG子程序是利用了INT 21H的07H号子功能等待用户的键盘输入,相当于TURBOC中的getch()函数,作为程序的断点。我们还可以利用其显示断点的调试信息(包括各寄存器的值)。但注意保存现场,并进行现场恢复。
四、结束语:
一个月以前我还只是会看别人的汇编程序,自从自己动手写程序后,自己的汇编编程水平有了很大的进步。写程序的过程中遇到问题,然后自己看书自己解决问题,这样学习汇编编程比光看书更有效。我的汇编编程的水平还很菜鸟,我会不断提高自己的水平,同时也希望与广大编程爱好者交流。
附:源程序(PARATEST.ASM)
; ************************************************
; * Program:Use asm language to creat a command *
; * line and parameter program. *
; *==============================================*
; * Designer:Howard Original Place:Wuhan *
; * Creat Date:09/30/1999 *
; * Modification Date:10/05/1999 *
; * Now Version:1.0 *
; * Pass:Tasm 5.0,Tlink 3.1 *
; *==============================================*
; * Modification History *
; *----------------------------------------------*
; * Version 1.0 1.Command line and parameter *
; * 09/30/1999 test program. *
; *----------------------------------------------*
; * Version 1.1 2.Add the spaces parameters jud- *
; * 10/05/19999 gement. *
; ************************************************
;
.model small
.386
.code
org 100h
start:
main proc far
push cs
pop ds ;ds=psp seg address
cld ;cf=0
mov si,81h ;psp+81h is the first parameter char
lea bx,parameter ;parameter address(offset) saved to bx
;unit parameter is used to save the parameter
lodsb ;load a byte from [si] to al,and si=si+1
cmp al,0dh ; Enter?
jz scanexit ;if yes then scan parameter end
cmp al,' '
jz judgespace
lodsb
continue:
push si
cmp al,'/'
jz parascanloop
jmp error ;wrong parameter
judgespace:
lodsb
; call debug ;set break point
cmp al,0dh
je scanexit
cmp al,' '
je judgespace
jne continue
parascanloop: ;saved the parameter to unit parameter
mov [bx],al ;save al to [bx],just save the parameters
lodsb
cmp al,0dh ;Enter?
jz choise ;if yes then jump choise
inc bx
jnb parascanloop ;the next char
scanexit:
lea dx,noparametermsg
call disp
call rettodos
choise:
lea si,parameter
mov al,[si+1] ;load the parameter to al
cmp al,'?' ;judge the parameter and choose ;the different process
jz help
cmp al,'p'
jz print
cmp al,'P'
jz print
jmp error ;wrong parameter
print:
lea dx,message
call disp
call rettodos
help: ;print the help message
lea dx,helpmsg
call disp
call rettodos
error: ;print the error parameter message
lea dx,wrongparamsg
call disp
mov ax,0200h
pop si
dec si
prnwrongparameter:
lodsb
cmp al,0dh
jz retdos
mov dl,al
int 21h
loop prnwrongparameter
retdos:
mov dl,'"'
int 21h
mov dl,'!'
int 21h
call rettodos
main endp
disp proc near
mov ah,09h
int 21h
ret
disp endp
rettodos proc near
mov ah,4ch
int 21h
rettodos endp
;
;set a break point
;debug proc near
; push ax dx
; mov ax,0900h
; mov dx,offset debugmsg
; int 21h
; mov ax,0700h
; int 21h
; pop dx
; pop ax
;debug endp
;debugmsg db 0dh,0ah,'Program stop here,press any key to continue...','$'
noparametermsg db 0ah,0dh,'There is no parameter,enter paratest /? for help.','$'
message db 0dh,0ah,'This is a parameter test program.','$'
wrongparamsg db 0dh,0ah,'The wrong parameter:"','$'
helpmsg db 0dh,0ah,'1.Paratest /?'
db 0dh,0ah,' Print the help message.'
db 0dh,0ah,'2.Paratest /p'
db 0dh,0ah,' Print the test message.','$'
parameter db 2 dup(?)
end start