Переглядач для файлів різних типів з визначенням типу файлу по розширенню і відповідно способу перегляду 2

Міністерство освіти та науки України

Кіровоградський Державний Технічний університет

Кафедра програмного забезпечення















Курсова робота

з дисципліни “Програмування на мові ASM-86” 

на тему:

“Переглядач для файлів різних типів, з визначенням типу файлу по розширенню і, відповідно, способу перегляду (txt, hex, bin)”




Зміст



Вступ

		Постановка задачі

		Обґрунтування вибору методів розв’язку задачі

		Алгоритм програми

		Реалізація програми

		Системні вимоги

		Інструкція для користувача

Висновки

Використана література

Лістинг програми


Вступ



При роботі з файлами їх буває необхідно переглянути. Для цього необхідно використовувати програми-переглядачі, які забезпечують прокрутку тексту у вікні перегляду. 

Іноді виникає потреба переглядати файли не лише в текстовому, а в інших форматах, зокрема в шістнадцятеричному та бінарному. Переглядач, який розроблено в роботі, дозволяє переглядати файли у вказаних трьох режимах.


1. Постановка задачі



Необхідно розробити програму-переглядач файлів у різному вигляді – війковому, шістнадцятеричному або текстовому, тип перегляду повинен визначатися за розширенням файлу.



2. Обґрунтування вибору методів розв’язку задачі



Для роботи з відео зручно використовувати прямий доступ до відеопам’яті, оскільки такий спосіб має високу ефективність. Для роботи з файлами – функції ДОС (21 переривання).

Для обробки клавіатури будемо використовувати функції прокрутки зображення. Ці функції для спрощення будуть різними для різних типів файлів, оскільки необхідно по-різному обчислювати зміщення при прокрутці і по-різному відображати інформацію.

Для програми використовується модель “small” пам’яті, цього достатньо для невеликих файлів. 



3. Алгоритм програми



1. Введення імені файла.

2. Визначення типу файла за символами в розширенні.

3. Читання змісту файла в пам’ять.

4. Очікування натиснення клавіші.

5. Якщо натиснута клавіша “сторінка вгору”, то 24 рази викликати ф-цію прокрутки вгору на 24 рядки.

6. Якщо натиснута клавіша “сторінка вниз”, то 24 рази викликати ф-цію прокрутки вниз на 24 рядки.

7. Якщо натиснута клавіша “вниз”, то збільшити вказівник кадру на довжину верхнього рядка.

8. Якщо натиснута клавіша “вгору”, то зменшити вказівник кадру на довжину рядка, який знаходиться над верхнім рядком (поза кадром).

9. Відобразити новий кадр на екран.

10. Якщо натиснута клавіша ESC, то завершити програму.

11. Перейти на п. 4. і продовжити роботу.



4. Реалізація програми



Після початку роботи програма запитує користувача про ім’я файла, який треба переглянути і робить спробу відкрити його. Якщо нема помилки, то з імені визначається його тип і у змінні в програмі заноситься інформація про тип. Введення з клавіатури здійснюється з використанням функцій DOS. 

При перегляді використовується запис текстової інформації у відеопам’ять. 

Після відкриття і читання файла програма чекає на натиснення клавіші. Використовується переривання 16 – функція 0. Потім аналізується код клавіші. Якщо код = 1 (вихід), то програма завершує роботу. Обробляються також клавіші “вгору”, “вниз”, “сторінка вгору” і “сторінка вниз”. Програма містить 3 групи функцій для кожного типу перегляду, кожна з яких містить по 3 функції: відображення на екрані поточного кадру, прокрутка зображення вгору і вниз.

Програма містить вказівник, який показує відстань від початку тексту до початку поточного кадру. При прокрутці вниз він збільшується (якщо досягне довжини 32000 – стає 0), а при прокрутці вгору – зменшується (якщо 0, то стоїть на місці – прокрутки немає). При натисненні клавіш “сторінка вгору” і “сторінка вниз” прокрутка відбувається на 24 рядки у відповідному напрямку.


5. Системні вимоги



Програма буде працювати на комп’ютері з процесором 80386 і старшим, 640 К і більше пам’яті, монітором CGA і вище. Необхідний дисковий накопичувач.



6. Інструкція для користувача



Для того, щоб переглянути файл, необхідно запустити на виконання файл thbview.exe. На екран буде виведено запит на введення імені файлу, який існує на диску. Можна ввести також і шлях. Якщо не виникне помилки, то після вводу на екрані з’явиться зміст файла у вигляді рядків тексту (файл TXT), шістнадцятеричного коду (файл HEX) або війкового формату (зображення всіх службових символів – BIN). Для переміщення можна використовувати клавіші “вгору”, “вниз”, “PgUp”, “PgDn”. Для виходу натисніть клавішу ESC.

При досягненні нижньої границі тексту перегляд буде переведено на початок файла. А при досягненні верхньої границі прокрутка здійснюватись не буде.

Розмір файла повинен бути меншим за 32 кілобайти.


Висновки



Отже, завдяки виконанню роботи, створена програма – переглядач для невеликих текстових файлів з розширеннями TXT (текстовий файл), HEX (шістнадцятеричний формат) та BIN (бінарний). Проілюстровані можливості виведення на екран на асемблері, роботу з файлами та пам’яттю. Програма має вигляд EXE-файла і невибаглива до ресурсів машини.


Використана література



1. Том Сван. Освоение Turbo Assembler. М., Діалектика, 1996

2. Зубков Д.Д. Программирование на Assembler для DOS, WINDOWS и UNIX. М., ДМК, 2000


Лістинг програми



.model compact

.386

.stack 1000

.data

file            db      32767 dup(0)



handle          dw      0

errmsg          db      'Помилка читання!$'

msg_enter       db      'Введiть iм`я файла (.txt, .bin, .hex): $'

filename        db      40 dup(0)

filelength      dw      0

filetype        db      2       ;2-txt,0-hex,1-bin

filepointer     dw      0       ;вказiвник на початок кадра



.code

start:

        jmp begin

;================================== T X T

;показ дампа для вигляду txt

showtxtdump     proc

        pusha

        ;очистка

        mov ax,0b800h

        mov es,ax

        cld

        mov cx,2000

        xor di,di

        mov ax,0700h

        rep stosw



        mov bx,word ptr fs:[filepointer]

        add bx,offset file



        mov bp,offset file

        add bp,32767

        xor si,si

        xor di,di



txt_l:  mov al,byte ptr fs:[bx]

        inc bx



        cmp al,10

        je tskip

        cmp al,13

        jne tput



        add si,80*2

        shl di,1

        sub si,di

        xor di,di



        jmp tskip

tput:

        mov byte ptr es:[si],al

        add si,2

        inc di

tskip:

        cmp bx,bp

        jb txt_loop

        mov bx,offset file

        mov word ptr fs:[filepointer],0

txt_loop:



        cmp si,4000

        jb txt_l

        cmp bx,bp

        jb txt_sav

        sub bx,bp

txt_sav:



        popa

        ret

showtxtdump     endp

;=================================================

scroll_downtxt     proc

        pusha

        ;пiдраховуємо довжину 1 рядка

        mov bx,word ptr fs:[filepointer]

        add bx,offset file

        xor dx,dx

no_len:

        inc dx

        cmp byte ptr fs:[bx],10

        je len_ok

        inc bx

        cmp dx,80

        jb no_len

len_ok:

        mov bx,word ptr fs:[filepointer]

        mov ax,bx

        add ax,offset file+32767

        sub ax,dx

        cmp bx,ax

        jae tok_scru

        add bx,dx

tok_scru:

        mov word ptr fs:[filepointer],bx

        call showtxtdump

        popa

        ret

scroll_downtxt     endp

;=================================================

scroll_uptxt     proc

        pusha

        ;пiдраховуємо довжину 1 рядка

        mov bx,word ptr fs:[filepointer]

        add bx,offset file-2

        xor dx,dx

uno_len:

        inc dx

        cmp byte ptr fs:[bx],13

        je ulen_ok

        dec bx

        cmp dx,80

        jb uno_len

ulen_ok:

        mov bx,word ptr fs:[filepointer]

        cmp bx,dx

        ja tok_up

        mov bx,dx

tok_up:

        sub bx,dx

        mov word ptr fs:[filepointer],bx

        call showtxtdump

        popa

        ret

scroll_uptxt     endp

;=================================

scroll_pgdntxt proc

        pusha

        mov cx,24

tsdn:    call scroll_downtxt

        loop tsdn

        popa

        ret

scroll_pgdntxt endp

;=================================

scroll_pguptxt proc

        pusha

        mov cx,24

tsdu:    call scroll_uptxt

        loop tsdu

        popa

        ret

scroll_pguptxt endp

;================================== H E X

;показ дампа для вигляду hex

showhexdump     proc

        pusha

        mov cx,20*25

        mov bx,word ptr fs:[filepointer]

        add bx,offset file



        mov bp,offset file

        add bp,32767

        mov ax,0b800h

        mov es,ax

        xor si,si

        xor di,di



hex_l:  mov al,byte ptr fs:[bx]

        inc bx



        mov dl,al

        and dl,15

        add dl,30h

        cmp dl,39h

        jbe h_1

        add dl,7

h_1:

        mov byte ptr es:[si+2],dl

        ;==============

        mov dl,al

        shr dl,4

        add dl,30h

        cmp dl,39h

        jbe h_2

        add dl,7

h_2:

        mov byte ptr es:[si],dl



        mov byte ptr es:[si+4],0

        add si,6

        inc di

        cmp di,20

        jne ok_hex

        xor di,di

        add si,(80-3*20)*2



ok_hex:



        cmp bx,bp

        jb hex_loop

        mov bx,offset file

        mov word ptr fs:[filepointer],0

hex_loop:



        loop hex_l

        cmp bx,bp

        jb hex_sav

        sub bx,bp

hex_sav:



        popa

        ret

showhexdump     endp

;=================================================

scroll_downhex     proc

        pusha

        mov bx,word ptr fs:[filepointer]

        mov ax,bx

        add ax,offset file+32767-20

        cmp bx,ax

        jae hok_scru

        add bx,20

hok_scru:

        mov word ptr fs:[filepointer],bx

        call showhexdump

        popa

        ret

scroll_downhex     endp

;=================================================

scroll_uphex     proc

        pusha

        mov bx,word ptr fs:[filepointer]

        cmp bx,20

        ja hok_up

        mov bx,20

hok_up:

        sub bx,20

        mov word ptr fs:[filepointer],bx

        call showhexdump

        popa

        ret

scroll_uphex     endp

;=================================

scroll_pgdnhex proc

        pusha

        mov cx,24

hsdn:    call scroll_downhex

        loop hsdn

        popa

        ret

scroll_pgdnhex endp

;=================================

scroll_pguphex proc

        pusha

        mov cx,24

hsdu:    call scroll_uphex

        loop hsdu

        popa

        ret

scroll_pguphex endp

;================================== B I N

;показ дампа для вигляду bin

showbindump     proc

        pusha

        mov cx,2000

        mov bx,word ptr fs:[filepointer]

        add bx,offset file



        mov bp,offset file

        add bp,32767

        mov ax,0b800h

        mov es,ax

        xor si,si

bin_l:  mov al,byte ptr fs:[bx]

        mov byte ptr es:[si],al

        inc bx

        cmp bx,bp

        jb bin_loop

        mov bx,offset file

        mov word ptr fs:[filepointer],0

bin_loop:



        inc si

        inc si

        loop bin_l

        cmp bx,bp

        jb bin_sav

        sub bx,bp

bin_sav:



        popa

        ret

showbindump     endp

;=================================================

scroll_downbin     proc

        pusha

        mov bx,word ptr fs:[filepointer]

        mov ax,bx

        add ax,offset file+32767-80

        cmp bx,ax

        jae ok_scru

        add bx,80

ok_scru:

        mov word ptr fs:[filepointer],bx

        call showbindump

        popa

        ret

scroll_downbin     endp

;=================================================

scroll_upbin     proc

        pusha

        mov bx,word ptr fs:[filepointer]

        cmp bx,80

        ja ok_up

        mov bx,80

ok_up:

        sub bx,80

        mov word ptr fs:[filepointer],bx

        call showbindump

        popa

        ret

scroll_upbin     endp

;=================================

scroll_pgdnbin proc

        pusha

        mov cx,24

sdn:    call scroll_downbin

        loop sdn

        popa

        ret

scroll_pgdnbin endp

;=================================

scroll_pgupbin proc

        pusha

        mov cx,24

sdu:    call scroll_upbin

        loop sdu

        popa

        ret

scroll_pgupbin endp

;==================================

getfilename proc

        pusha



        ;введення iменi файла

        push fs

        pop ds

        mov dx,offset msg_enter

        mov ah,9

        int 21h



        mov bx,offset filename

ent_l:  mov ah,1

        int 21h

        cmp al,13

        mov byte ptr ds:[bx],al

        inc bx

        cmp al,13

        jne ent_l

        dec bx

        mov byte ptr ds:[bx],0



        ;визначення типу файла

        mov bx,offset filename

        dec bx

name_s: inc bx

        mov al,byte ptr fs:[bx]

        cmp al,0

        jne name_s

        sub bx,2

        mov ah,byte ptr fs:[bx]

        mov al,byte ptr fs:[bx+1]



        cmp ax,6578h                    ;HEX

        jne other1

        mov byte ptr fs:[filetype],1

        jmp typ_exit

other1:

        cmp ax,696eh                    ;BIN

        jne other2

        mov byte ptr fs:[filetype],0

        jmp typ_exit

other2:

        mov byte ptr fs:[filetype],2    ;TXT



typ_exit:

        popa

        ret

getfilename endp

;==================================

readfile proc

        pusha

        ;open

        mov ah,3dh

        xor al,al

        push fs

        pop ds

        mov dx,offset filename

        int 21h

        jc read_error

        mov bx,ax



        ;read

        mov ah,3fh

        mov cx,32767

        push fs

        pop ds

        mov dx,offset file

        int 21h

        jc read_error

        mov word ptr fs:[filelength],ax



        ;close

        mov ah,3eh

        mov bx,word ptr fs:[handle]

        int 21h



        popa

        ret

read_error:

        push fs

        pop ds

        mov dx,offset errmsg

        mov ah,9

        int 21h

        popa

        mov ah,4ch

        int 21h

readfile endp

;==================================

begin:

        xor ah,ah

        mov al,3

        int 10h

        mov ax,seg handle

        mov fs,ax

        call getfilename

        call readfile



        mov ah,5

        mov ch,48h

        int 16h

work:

        mov ah,0

        int 16h

        mov bl,byte ptr fs:[filetype]

        cmp ah,50h

        jne work_1



        cmp bl,0

        jne d1

        call scroll_downbin

        jmp work

d1:     cmp bl,1

        jne d2

        call scroll_downhex

        jmp work

d2:

        call scroll_downtxt

        jmp work



work_1:

        cmp ah,48h

        jne work_2



        cmp bl,0

        jne u1

        call scroll_upbin

        jmp work

u1:     cmp bl,1

        jne u2

        call scroll_uphex

        jmp work

u2:

        call scroll_uptxt

        jmp work



work_2:

        cmp ah,51h

        jne work_3



        cmp bl,0

        jne pd1

        call scroll_pgdnbin

        jmp work

pd1:    cmp bl,1

        jne pd2

        call scroll_pgdnhex

        jmp work

pd2:

        call scroll_pgdntxt

        jmp work



work_3:

        cmp ah,49h

        jne work_4



        cmp bl,0

        jne pu1

        call scroll_pgupbin

        jmp work

pu1:    cmp bl,1

        jne pu2

        call scroll_pguphex

        jmp work

pu2:

        call scroll_pguptxt

        jmp work



work_4:

        cmp ah,1

        jne work

        mov ah,4ch

        int 21h

end start


Блок-схема алгоритму





Початок



Введення імені файла



Визначення типу файла



Читання змісту файла в пам’ять

Очікування натиснення клавіші

Кінець

Так

Ні

Esc

M1

Так

Ні

Up

Так

Ні

Down

M2



Прокрутка вгору на 1 рядок



Прокрутка вниз на 1 рядок

M1

M1

Так

Ні

PgUp

Так

Ні

PgDown



Прокрутка вниз на 24 рядки



Прокрутка вгору на 24 рядки

M2

M1

M1

M1