Програми – аналоги DOS-програм ren, xcopy
Після обробки всіх файлів і каталогів виконання програми завершується. При копіюванні файлів виводиться ім'я кожного. Необхідно написати програми для перейменування файлів та копіювання файлів і підкаталогів (аналоги REN, XCOPY). Знайти всі файли в поточному каталозі, які відповідають заданій масці. Для використання програми перейменування файлів треба вказати: Targetname db 100 dup (0) ;сюди… Читати ще >
Програми – аналоги DOS-програм ren, xcopy (реферат, курсова, диплом, контрольна)
Міністерство освіти та науки України.
Кіровоградський Державний Технічний університет.
Кафедра програмного забезпечення.
Курсова робота.
з дисципліни «Програмування на мові ASM-86» на тему:
Програми — аналоги DOS-програм ren, xcopy.
Зміст.
1. Вступ.
2. Постановка задачі.
3. Обґрунтування вибору методів розв’язку задачі.
4. Алгоритм програми.
5. Реалізація програми.
6. Системні вимоги.
7. Інструкція для користувача.
8. Висновки.
9. Використана література Лістинг програми.
1. Вступ.
З файлами на диску можна проводити певні операції - зокрема перейменовувати та копіювати. У даній роботі розглянуті програми, які дозволяють перейменувати файл і скопіювати задані файли та каталоги. Програми написані на мові ASM-86.
2. Постановка задачі.
Необхідно написати програми для перейменування файлів та копіювання файлів і підкаталогів (аналоги REN, XCOPY).
3. Обґрунтування вибору методів розв’язку задачі.
Для роботи з файлами в можна використовувати його системний сервіс, який зосереджено в перериванні 21h. Зокрема, використовуються такі функції:
56h — перейменувати файл.
3ch — створити файл.
3dh — відкрити файл.
3eh — закрити файл.
40h — читати з файла блок.
41h — записати блок у файл Для перегляду дерева підкаталогів зручно використовувати рекурсивну функцію, яку викликати при вході в підкаталог. Для пошуку будемо використовувати функції 4eh (findfirst) I 4fh (findnext).
4. Алгоритм програми.
Алгоритм перейменування файла.
1. Занести в пам’ять комадний рядок.
2. Викликати функцію 56h.
3. Якщо була помилка, то вивести повідомлення.
Алгоритм копіювання файлів.
1. Проаналізувати командний рядок.
2. Знайти всі файли в поточному каталозі, які відповідають заданій масці.
3. Для кожного файла викликати функцію copy_file.
4. Якщо не було задано ключ /s, то закінчити перегляд.
5. Знайти всі підкаталоги.
6. Зайти в кожен підкаталог диску і рекурсивно перейти в п. 2.
7. При завершенні повернутися у вихідний каталог.
8. Кінець.
5. Реалізація програми.
Програма складається з функцій. Після запуску програми викликається функція process_commandline для аналізу командного рядка. Потім відбувається виклик функції process_files, яка копіює всі файли в заданому каталозі в заданий. Копіювання здійснюється за допомогою функції copy_file.
Якщо було задано параметр копіювання підкаталогів, викликається функція process_directory, яка шукає всі підкаталоги в даному і для кожного рекурсивно викликає функцію process_files.
Після обробки всіх файлів і каталогів виконання програми завершується. При копіюванні файлів виводиться ім'я кожного.
6. Системні вимоги.
Операційна система DOS.
CPU INTEL 8086 або ст.
RAM 640 K.
VIDEO CGA або старший.
7. Інструкція для користувача.
Для використання програми перейменування файлів треба вказати:
k_ren letter. doc letter.txt.
Якщо не виникне помилок, то файл буде перейменовано.
Для копіювання треба вказати такий рядок:
k_xcopy *.com c: utils [/s].
де *.com — маска для файлів, які треба копіювати, c: utils — каталог, куди треба копіювати, а необов’язковий ключ /s вказує на те, що в копіювання треба включити також підкаталоги даного підкаталогу. При копіюванні буде створено точну копію частини дерева.
8. Висновки.
Завдяки виконанню курсового проекту створені програми для перейменування файлів та копіювання групи файлів. Вони є прикладом роботи з файловою системою засобами MS-DOS і демонструє елементи системного програмування для IBM PC.
9. Використана література.
1. Майко Г. В. Assembler для IBM PC. М., 1997.
2. Лекції з дисципліни «Програмування на мові ASM-86».
Додаток. ЛІСТИНГ ПРОГРАМИ.
K_XCOPY.ASM.
.model tiny.
.code.
org 100h.
start:
jmp begin.
mem_errmsg db 'Memory allocation error.$'.
file_errmsg db 'Files error!$'.
param_err db 'Parameters error! Example: k_xcopy c:*.* d: [/s]$'.
all_dirs db '*.*', 0.
up_dir db '.', 0.
handle1 dw 0.
handle2 dw 0.
orig_date dw 0.
orig_time dw 0.
process_dirs db 0 ;вкл. пiдкаталоги.
filename1 db 100 dup (0) ;1 параметр _xcopy.
filename2 db 100 dup (0) ;2 параметр _xcopy.
targetname db 100 dup (0) ;сюди буде формуватися iм`я файла призначення.
;;;;;;;;;;;;;;;;
;копiювання файла.
;ds:si — ASCIIZ старий файл.
;ds:di — ASCIIZ новий файл.
;;;;;;;;;;;;;;;;
copy_file proc.
;видiлити пам`ять.
mov ah, 48h.
mov bx, 2048.
int 21h.
jnc mem_ok.
jmp mem_err.
mem_ok:
mov es, ax ;сегмент видiлений для копiювання.
;open file for read.
mov ah, 3dh.
xor al, al.
mov dx, si.
int 21h.
jc file_error.
mov word ptr handle1, ax.
;get date.
mov bx, ax.
mov ax, 5700h.
int 21h.
mov word ptr orig_time, cx.
mov word ptr orig_date, dx.
;open file for write.
mov ah, 3ch.
xor cx, cx.
mov dx, di.
int 21h.
jc file_error.
mov word ptr handle2, ax.
push ds.
push es.
pop ds.
xor dx, dx.
;read block.
next_block:
mov ah, 3fh.
mov bx, word ptr cs: handle1.
mov cx, 32 768.
int 21h.
cmp ax, 0 ;eof.
je stop_copy.
;write to file.
mov cx, ax.
mov ah, 40h.
mov bx, word ptr cs: handle2.
int 21h.
jmp next_block.
stop_copy:
pop ds.
;set date.
mov ax, 5701h.
mov bx, word ptr handle2.
mov cx, word ptr orig_time.
mov dx, word ptr orig_date.
int 21h.
;close files.
mov ah, 3eh.
mov bx, word ptr handle1.
int 21h.
mov ah, 3eh.
mov bx, word ptr handle2.
int 21h.
;attrib.
mov ah, 43h.
xor al, al.
mov dx, offset filename1.
int 21h.
mov ah, 43h.
mov al, 1.
mov dx, offset filename2.
int 21h.
;звiльнити.
mov ah, 49h.
int 21h.
jc mem_err.
ret.
file_error:
mov ah, 9.
mov dx, offset file_errmsg.
int 21h.
mov ah, 4ch.
int 21h.
mem_err:
mov ah, 9.
mov dx, offset mem_errmsg.
int 21h.
mov ah, 4ch.
int 21h.
copy_file endp.
;;;;;;;;;
;end copy_file.
;;;;;;;;;
;;;;;;;;;;
;process_dirs.
;;;;;;;;;;
process_directory proc.
;взнати адресу DTA.
mov ah, 2fh.
int 21h ;es:bx — DTA.
;findfirst.
mov ah, 4eh.
mov cx, 10h.
mov dx, offset all_dirs ;*.*.
int 21h.
dfindnext:
jnc zzz.
jmp dstop_search ;кiнець пошуку.
zzz:
cmp byte ptr [bx+15h], 10h.
jne not_dir.
cmp byte ptr [bx+1eh],'.'.
je not_dir.
;отже, знайдено пiдкаталог.
;1) до filename2 додати його назву.
mov di, offset filename2.
mov cx, 100.
xor ax, ax.
repnz scasb.
dec di.
mov si, bx.
add si, 1eh.
mov cx, 13.
rep movsb.
;2) створити каталог filename2.
mov ah, 39h.
mov dx, offset filename2.
int 21h.
;3) до filename2 додати.
mov di, offset filename2.
mov cx, 100.
xor ax, ax.
repnz scasb.
dec di.
mov byte ptr [di],''.
mov byte ptr [di+1], 0.
push di.
;4) перейти в знайдений каталог.
mov ah, 3bh.
mov dx, bx.
add dx, 1eh.
int 21h.
jc skip_thisd.
;5) зберегти DTA.
sub sp, 2bh.
cld.
mov di, sp.
mov si, bx.
mov cx, 2bh.
rep movsb.
;6) call process_files.
call process_files.
;7) вiдновити DTA.
mov di, bx.
mov si, sp.
mov cx, 2bh.
rep movsb.
add sp, 2bh.
;8) chdir .
mov ah, 3bh.
mov dx, offset up_dir.
int 21h.
skip_thisd:
;9) вiд filename2 вiдняти назву.
pop di.
sub di, 2.
std.
mov al,''.
mov cx, 13.
repnz scasb.
mov byte ptr [di+2], 0.
cld.
not_dir:
;робимо findnext.
mov ah, 4fh.
int 21h.
jmp dfindnext.
dstop_search: ;стоп пошуку.
ret.
process_directory endp.
;;;;;;;;;;;;
;process_dirs.
;;;;;;;;;;;;
;;;;;;;;
;process_files.
;;;;;;;;
;копiювання файлiв в 1 каталозi.
process_files proc.
;взнати адресу DTA.
mov ah, 2fh.
int 21h ;es:bx — DTA.
;findfirst.
mov ah, 4eh.
xor cx, cx.
mov dx, offset filename1.
int 21h.
findnext:
jc stop_search ;кiнець пошуку.
;;copy.
;побудувати targetname.
push es.
;копiюємо path.
mov si, offset filename2.
mov di, offset targetname.
push ds.
pop es.
fil0: lodsb.
cmp al, 0.
je stop_fil0.
stosb.
loop fil0.
stop_fil0:
;додати filename.
mov si, bx.
add si, 1eh.
fil1:
lodsb.
cmp al, 0.
je stop_fil1.
stosb.
loop fil1.
stop_fil1:
mov byte ptr [di], 0.
mov si, bx.
add si, 1eh.
mov di, offset targetname.
push bx.
call copy_file.
pop bx.
pop es.
;видати iм`я файла.
mov si, bx.
add si, 1eh.
cont_inc:
mov al,[si].
cmp al, 0.
je stop_inc.
inc si.
jmp cont_inc.
stop_inc:
mov byte ptr [si], 10.
mov byte ptr [si+1], 13.
mov byte ptr [si+2],'$'.
mov dx, bx.
add dx, 1eh.
mov ah, 9.
int 21h.
;;copy.
;робимо findnext.
mov ah, 4fh.
int 21h.
jmp findnext.
stop_search: ;стоп пошуку.
cmp byte ptr ds:[process_dirs], 1.
jne no_dirs.
;
;виклик пошуку каталогiв.
;
call process_directory.
no_dirs:
ret.
process_files endp.
;;;;;;;;
;process_files.
;;;;;;;;
;;;;;;;;
;process_commandline.
;;;;;;;;
process_commandline proc.
mov si, 80h.
mov al,[si].
cmp al, 0.
je params_error.
add si, 2.
mov di, offset filename1.
name1:
lodsb.
cmp al, 20h.
je stop_name1.
cmp al, 13.
je params_error.
stosb.
jmp name1.
stop_name1:
mov di, offset filename2.
name2:
lodsb.
cmp al, 20h.
je stop_name2.
cmp al, 13.
je stop_name2.
stosb.
jmp name2.
stop_name2:
mov byte ptr [di],''.
cmp al, 13.
je stop_cmdl.
name_s:
lodsb.
cmp al, 20h.
je stop_names.
cmp al, 13.
je stop_names.
cmp al,'s'.
jne name_s.
mov byte ptr [process_dirs], 1.
stop_names:
stop_cmdl:
ret.
params_error:
mov dx, offset param_err.
mov ah, 9.
int 21h.
mov ah, 4ch.
int 21h.
process_commandline endp.
;;;;;;;;
;process_commandline.
;;;;;;;;
begin:
;decrease memory size.
cld.
mov bx, 4096.
mov ah, 4ah.
int 21h.
mov ax, bx.
shl ax, 4.
dec ax.
mov sp, ax.
call process_commandline.
call process_files.
.exit 0.
end start.
K_REN.ASM.
;перейменування файла.
;k_ren name1. ext1 name2. ext2.
.model tiny.
.code.
org 100h.
start:
jmp go.
old_name db 50 dup (0).
new_name db 50 dup (0).
;old_name db 'autoexec.bat', 0.
;new_name db 'ccc.xxx', 0.
em db 'Error!$'.
go:
push cs.
pop ax.
mov ds, ax.
mov es, ax.
;names.
mov bx, 80h.
mov dl, byte ptr cs:[bx] ;length.
cmp dl, 0.
je error.
;old name.
xor ax, ax.
mov si, 82h.
mov di, offset old_name.
next_sym:
mov al,[si].
cmp al,' '.
je stop.
mov [di], al.
inc si.
inc di.
inc ah.
cmp ah, dl.
ja error.
jmp next_sym.
stop:
;new name.
mov di, offset new_name.
inc si.
next_sym1:
mov al,[si].
cmp al, 13.
je stop1.
mov [di], al.
inc si.
inc di.
inc ah.
cmp ah, dl.
ja error.
jmp next_sym1.
stop1:
;перейменовуємо.
mov dx, offset old_name.
mov di, offset new_name.
mov ah, 56h.
int 21h.
jnc no_error.
error:
mov ah, 9.
mov dx, offset em.
int 21h.
no_error:
.exit 0.
end start.