/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler (Ассемблер)

Выпуск № 752
от 16.05.2007, 18:05

Вопрос № 86.315

Здравствуйте. Я снова со своей задачей по обработке заданного файла. Один из экспертов посоветовал мне использовать код с циклом по копированию введенной строки, а потом подавать на вход прерыванию 3d скопированную строку. Этот код работает. Но я решил слегка оптимизировать этот код (цикл в листинге закомментирован) и подавать на вход прерыванию 3d введенную строку (без копирования), начиная с 3-го байта. 0 в конце строки уже есть к тому времени. Модифицированная таким образом программа работает следующим образом: появляется досовское окошко и с бешеной скоростью начинает выводиться фраза "file open error", через строку, многократно и до бесконечности, пока не закроешь. Через строку наверное потому что там стоит mov ah,9 lea dx,ent int 21h Цикл vvod_file выполняется бесконечно, ввести строку программа не дает. То есть прерывание mov ah,0ah lea dx,data int 21h вообще на самом деле не ждет чтобы я там что-то ввел. Вместо этого программа просто продолжает работу дальше. Естественно, что функция по открытию файла не выполняется. А как такое может быть чтобы пр-е 0ah не дожидалось ввода строки? Если же исследовать файл в отладчике, то он на прерывании 0ah также не предлагает ввести строку, а продолжает работу дальше. Если после этого прерывания стоит цикл, то все работает нормально, строку можно ввести. Еще не понятно - КАК ПОСЛЕДУЮЩИЙ КОД МОЖЕТ ВЛИЯТЬ НА ВЫПОЛНЕНИЕ ПРЕДЫДУЩЕГО КОДА? Прерывание же выполняется по-разному в зав. от цикла. Ну и самое интересное, что эта программа сразу после компиляции работала нормально, и только после перезагрузки компьютера перестала работать. С чего вдруг она так изменила поведение после перезагрузки, что я не учел? И как ее вернуть к нормальной работе? Приложение: .model small .stack 100h .data message1 db "file open error",13,10,'$' message2 db "file read error",13,10,'$' message3 db "file create error",'$' message4 db "Enter source file name",13,10,'$' message5 db "Enter new file name",13,10,'$' message6 db "file processed",13,10,'$' data db 256 dup(?) path db 255 dup(0) path2 db 255 dup(0) dta db 4096 dup(?) dta2 db 4438 dup(?) ent db 13,10,'$' .code start: mov ax,@data mov ds,ax lea dx,message4 mov ah,9 int 21h vvod_file: mov ah,0ah lea dx,data int 21h ;- данное прерывание выполняется по-разному в зав. от того, какой код идет в дальнейшем ;теперь в data имя файла без 0 в конце начиная с 3-го байта ;xor ch,ch ;xor di,di ;mov si,2 ; mov cl,data+1 ;label1: ; mov al,[data+si] ; mov [path+di],al ; inc si ; inc di ; loop label1 ;здесь я решил избежать цикла копирования и просто обработать введенную строку, добавив 0 в конец ;следующий блок записывает 0 в конец строки ;его я ес-но убираю когда ставлю цикл xor cx,cx mov cl,data+1 ;длина строки mov bx,offset data add bx,cx add bx,2 mov byte ptr [bx],0 ;добавляем 0 в конец строки mov ah,9 lea dx,ent int 21h mov ax,3d00h mov dx,offset data add dx,2 ;строка начинается с 3-го байта, поэтому необходимо сдвинуть dx на 2 вправо int 21h ;otkrili file jnc norm ; и здесь перехода на norm никак не происходит lea dx,message1 mov ah,9 int 21h jmp vvod_file norm: mov bx,ax mov cx,1000h mov dx,offset dta mov ah,3fh int 21h ;schitali 4 Kb v dta jnc norm1 lea dx,message2 mov ah,9 int 21h jmp vvod_file

Отправлен: 10.05.2007, 19:35 Вопрос задал: Blackie (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Sov Здравствуйте, Blackie! Действительно можно сделать проще, так, как предложили вы) Мне кажется что ошибка в том что вы неправильно оформляете массив data Функция 0ah требует чтобы вы указали максимальную длину строки и выделили под нее соотв. кол-во памяти например data db 53,60 dup(0);длина строки не более 53 символов ;и ноль в конец добавлять не придется)

Ответ отправил: Sov (статус: 2-ой класс) Ответ отправлен: 10.05.2007, 21:18 Оценка за ответ: 5 Комментарий оценки: Теперь работает, спасибо.

Вопрос № 86.424

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

Отправлен: 11.05.2007, 13:51 Вопрос задал: Gvarishvili George Raulievich (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Gvarishvili George Raulievich! Книги по ассемблеру Вы можете скачать тут. Есть книги Абеля, Зубкова, Юрова, Калашникова, Жордайна, Рихтера. Программы на ассемблере пишут в любом простом редакторе типа блокнота, но Вам для начала нужен редактор с подсветкой синтаксиса к примеру: gridinsoft notepad. Еще Вам понадобится компилятор: -Тут, тут и тут Вы можете найти МАСМ. -Тут Вы можете найти ТАСМ. Удачи! --------- И только наступив на грабли мы преобретаем драгоценный опыт!

Ответ отправил: Зенченко Константин Николаевич (статус: Студент) Ответ отправлен: 11.05.2007, 16:16 Оценка за ответ: 4

Отвечает: Волков Павел Юрьевич Здравствуйте, Gvarishvili George Raulievich! Книжку лучше взять в бумажном виде, у Юрова (учебник, справочник и практическое руководство) очень хорошее описание языка, в справочнике - подробное описание инструкций процессора. Из компиляторов посоветую FASM(flat assembler), домашняя страница - http://flatassembler.net. Приемущества: -компактен (пакет для Windows менее мегабайта); -в составе пакета есть среда разработки (текстовый редактор, без подсветки, из которого проводится компиляция); -есть версии как для Windows, так и для DOS,GNU/Linux,*BSD; -позволяет творить чудеса %) "Недостатки": -большинство примеров в книгах приводятся для TASM,MASM (перевод текста для сборки в FASM вызывает трудности только в начале обучения); -большинство примеров на форуме проекта (http://board.flatassembler.net/); -мало документации на русском. За русской документацией, примерами обратитесь на WASM.RU. Там есть несколько статей, перевод документации (http://wasm.ru/docs/6/fasm164manualrus.zip) , на форуме всегда помогут советом. --------- Век живи, век учись.

Ответ отправил: Волков Павел Юрьевич (статус: Студент) Ответ отправлен: 11.05.2007, 17:47

Вопрос № 86.462

Здравствуйте! проблема с кодом асма. не компилируется, в чем дело - непонятно. Данная программа предназначена для шифрования файлов методом исключающего «или». Принцип работы программы прост. Содержимое исходного файла (crypt.txt) кодируется с помощью ключа, используя операцию исключающего «или» побитно. Под ключом понимается текст, вводимый с клавиатуры непосредственно в программе. Следует отметить, что зашифрованная информация записывается в исходный файл(crypt.txt), изменяя его. Для расшифровки требуется перезапуск программы с использованием того же ключа. Особенность такова, что не имея ключа расшифровать информацию практически невозможно. После повторного проведения операции получаем изначальный файл. Программа работает на файлах .exe, .txt, .bmp, .jpg и так далее. Среда - виндоус. Приложение: MASM MODEL small ; модель памяти STACK 256 .data ;описание переменных и констант KEY_BUF_SIZE equ 256 BLACK equ 0 BACKGROUND_COLOR equ BLACK MIN_SIZE equ 64 ; размер считываемого куска из файла CONSOLE_PARAM db 128 dup (0) FILE_HANDLE dw 0 FILE_SIZE dw 0 FILE_NAME db 100 dup (?) ; длинна пути к файлу FILE_NAME_CMD db 100 dup (?) ; длинна имени файла READ_BUF db MIN_SIZE dup(0) BYTES_READ dw 0 CURRENT_POS dw 0 KEY_BUF db KEY_BUF_SIZE dup(?) KEY_SIZE dw 0 FILE_NAME_SIZE db 0 CMD_LEN dw 0 Count db 0 Len dw 40 FLAG_ db 0 X_s db 20 ;= начальные значения Х и У Y_s db 5 ;= X_w db 0 Y_w db 0 Th_0 db 01111001b Th_1 db 00110111b ;фон: св.хаки, символ: св.серый Th_2 db 00011100b ;фон: синий , символ: красный Th_3 db 01001111b ;фон: черный , символ: св.синий ; ; Мигаюший символ (7ой бит) ; Цвет фона (4-6 биты) ; Символ яркого цвета (3ий бит) ; Цвет символа (0-2 биты) msg_1 db " Enter File Name and press <Enter>: " msg_2 db " Enter Crypt Key and press <Enter>: " msg_3 db ":> " msg_4 db " " msg_menu db " <Esc> - Exit, <F1> - Run EN\\DEcrypt " msg_err_1 db " *** Error Opening File *** " msg_exit db " *** Press <Esc> for exit *** " msg_end_crypt db " *** End of encryption \\ decryption *** " .386 ; Директива, позволяющая использовать команды 386-го процессора .code main: ; Работа с PSP mov ax, @data ; инициализация ds mov ds, ax ; mov cl, es:80h ; проверяем есть ли в команд. строке cmp cl, 0 ; атрибут. jne CON1 ; В cl находится длина атрибута jmp P_S ; если PSP не используется, то идем на P_S CON1: xor ch, ch ;=начинаем с первого эл-та атрибута mov di, 0 ;= mov si, 81h ;= dec cx ;= mov CMD_LEN, cx ; записываем в CMD_LEN длину атрибута COPY: ; переписываем в FILE_NAME атрибут mov bh, es:[si+1] ; mov FILE_NAME[di], bh ; inc di ; inc si ; loop copy ; mov cx, CMD_LEN ;Т.к. при вводе в атрибут имени файла в CX__: ; FILE_NAME, записывается ПОЛНЫЙ путь mov si, cx ; к файлу. Поэтому, начиная с конца, мы mov dh, FILE_NAME[si] ; ишем символ "\\". Чтобы ВЫДЕЛИТЬ имя cmp dh, \'\\\' ; файла от полного пути к нему. je CX_W ; loop CX__ ; CX_W: mov di, 0 inc si CX_W_: mov al, FILE_NAME[si] ;Переписываем в FILE_NAME_CMD имя файла mov FILE_NAME_CMD[di], al ; из FILE_NAME. inc si ; inc di ; cmp si, CMD_LEN ; jne CX_W_ ; P__1: mov FLAG_, 1 ; флаг успешного чтения имени файла через PSP P_S: mov ax, @data ; инициализация ds mov ds, ax ; mov ax, @data ; инициализация es mov es, ax ; START: call Reg_XOR ; очищаем регистры call CLR_SCR ; очищаем экран call Print_Empty_Window ; рисование главного окна mov al, 0 ; рисование первого заголовка mov dl, 0 ; mov bl, Th_2 ; lea si, msg_1 ; call Print_Window_Title ; mov al, 2 ; рисование "окна" для ввода mov dl, 4 ; имени файла mov bl, Th_1 ; lea si, msg_3 ; call Print_Window_Title ; mov al, 4 ; рисование второо заголовка mov dl, 0 ; mov bl, Th_2 ; lea si, msg_2 ; call Print_Window_Title ; mov al, 16 ; вывод меню mov dl, 0 ; mov bl, Th_0 ; lea si, msg_menu ; call Print_Window_Title ; mov count, 0 ; mov al, 6 ; зарисовка пространства под JIU: ; "окно" для ввода ключа push ax ; ; mov dl, 4 ; mov bl, Th_1 ; lea si, msg_4 ; call Print_Window_Title ; ; pop ax ; вынуть из стека inc al ; смещение+1 inc count ; cmp count, 8 ; jne JIU ; PP: cmp FLAG_, 1 jne READ_FILE_NAME call Print_File_Name jmp P ; Считывает ИМЯ_ФАЙЛА и выводит его на экран с атрибутом цвета. READ_FILE_NAME: mov ch, FILE_NAME call Starting_Value_XY add X_w, 6 add Y_w, 2 lea si, FILE_NAME FF: push cx call Put_XY ;установка курсора mov ah, 08h ; ввод с клавиатуры без отображения int 21h pop cx push ax ; in al, 60h ;далее проверки на нажатие соответствующих клавиш cmp al, 1h ; <Esc> je PAUSE ; cmp al, 03bh ; <F1> je START ; cmp al, 1ch ; <Enter> pop ax ; je P ; push cx mov [si], al ;сдвиг курсора по строке inc si mov ah, 09h ;вывод на экран символа с соответствующей графической темой mov bl, Th_1 ; mov cx, 1 ; int 10h ; pop cx inc X_w inc FILE_NAME_SIZE loop FF P: mov FLAG_, 0 ; обнуляем флаг состояния lea dx, FILE_NAME ; call FILE_OPEN_ ; ; Считывает КЛЮЧ и выводит его на экран с атрибутом цвета. call Starting_Value_XY add X_w, 4 add Y_w, 6 lea si, KEY_BUF P_: call Put_XY mov cx, 32 ;длина ключа FF_: push cx call Put_XY ;установка курсора mov ah, 08h int 21h pop cx push ax ; in al, 60h ;проверки на нажатие клавиш cmp al, 1h ; <Esc> je PAUSE cmp al, 03bh ; <F1> je START cmp al, 1ch ; <Enter> pop ax je P_1 push cx mov [si], al inc si mov ah, 09h ;вывод на экран с графикой mov bl, Th_1 mov cx, 1 int 10h pop cx inc X_w inc KEY_SIZE loop FF_ mov ah, X_s ;переход на строку mov X_w, ah add X_w, 4 inc Y_w cmp KEY_SIZE ,KEY_BUF_SIZE jne P_

Отправлен: 11.05.2007, 17:45 Вопрос задал: Klaus_Blumenstrauss (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 5)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Klaus_Blumenstrauss! cmp dh, \'\\\' ; в этой строке ошибка cmp dh, ''; так должно быть Удачи! Приложение: поставил вместо того чего нет и все скомпелировалось. REG_XOR: CLR_SCR: PRINT_EMPTY_WINDOW: PRINT_WINDOW_TITLE: PRINT_FILE_NAME: FILE_OPEN_: STARTING_VALUE_XY: PUT_XY: PAUSE: P_1:ret end main --------- И только наступив на грабли мы преобретаем драгоценный опыт!

Ответ отправил: Зенченко Константин Николаевич (статус: Студент) Ответ отправлен: 11.05.2007, 18:17 Оценка за ответ: 5

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.52 от 02.05.2007