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

Выпуск № 795
от 02.07.2007, 18:35

Вопрос № 93.004

Добрый день! Я уже столько раз это перечитываю, в отладчике смотрю... но эти строки никак понять не могу: .... mov si,100h ;DS:SI откуда перемещать будем rep movsb ;перебрасываем нашу программу в область ;7 видеостраницы ; ___________________________________________________ ; !!! Теперь ВНИМАТЕЛЬНО следим за CS в отладчике !!! ; ___________________________________________________ jmp dword ptr cs:[Off_move] ;Прыгаем куда переместили (фактически на ;следующую строку, только уже в сегменте ;0BF00h!) ; Что показал отладчик? Подумайте, что произошло... ; Теперь мы уже в области экрана Lab_jmp: ;Вот сюда-то мы и прыгнули с предыдущей строки! Толко CS теперь ;равен 0BF00h. Внимательно проследите в отладчике за этим... .... НУ почему полсле jmp'а cs поменялся?..(( Ну в нем было то же, что и в ss и тут резко он меняется.... Если не сложно, помогите мне, пожалуйста... Спасибо! Удачи! Всего наилучшего! Приложение: ; VIRUS13.ASM - программа к Главе № 13 ; (С) Авторские права на файлы-приложения принадлежат автору книги ; "Ассемблер? Это просто! Учимся программировать под MS-DOS" ; Автор: Калашников Олег Александрович (e-mail: Assembler@Kalashnikoff.ru) ; http://www.Kalashnikoff.ru ; --- Ассемблирование (получение *.com файла) --- ;При использовании MASM 6.11 - 6.13: ;ML.EXE virus13.asm /AT ;При использовании TASM: ;TASM.EXE virus13.asm ;TLINK.EXE virus13.obj /t/x .286 ;Будем использовать инструкции 80286 процессора (пришло время!) cseg SEGMENT assume cs:CSEG, ds:CSEG, es:CSEG, ss:CSEG org 100h Begin: jmp Init ;Преходим на процедуру инициализации ; --- Общие данные --- Off_move dw offset Lab_jmp ;Смещение и Seg_move dw 0BF00h ;сегмент адреса, куда будем прыгать ;0BF00h - адрес (сегмент) 7 страницы дисплея ;Младшее слово в начале, а старшее - в конце Off_return dw offset Lab_return ;Смещение и Seg_return dw ? ;сегмент адреса для возврата ; === Процедуры работы с файлами === ; --- Открытие файла для записи --- ; Вход: DX - путь файлу ASCIIZ ; Выход: Handle, BX - номер файла Open_file proc mov ax,3D02h ;Открываем файл для чтения/записи int 21h mov Handle,ax ;Сохраняем номер файла mov bx,ax ret Handle dw 0FFFFh ;Переменная для хранения номера файла (по умолчанию 0FFFFh) Open_file endp ; --- Закрытие файла --- ; Вход: Handle - номер открытого файла ; Выход: ничего Close_file proc cmp Handle,0FFFFh ;Нет открытых файлов? je No_close ;Тогда выходим (закрывать нечего!) mov bx,Handle ;Закрываем файл... mov ah,3Eh int 21h No_close: ret Close_file endp ; --- Поиск первого файла --- Find_first proc mov ah,4Eh ;Ищем первый файл по маске (Mask_file) xor cx,cx ;Атрибуты обычные (CX=0) mov dx,offset Mask_file ;Адрес маски в DS:DX int 21h ;Теперь (если нашли файл *.com в текущем каталоге) ;имя файла находится по адресу 0BF00:001Eh, ;т.е. по смещению 30... ret Mask_file db '*.com',0 ;Маска для поиска (только COM-файлы) Find_first endp ; --- Поиск следующих файлов --- Find_next proc xor dx,dx ;DS:DX указывают на DTA xor cx,cx mov ah,4Fh int 21h ret Find_next endp ; --- Заражение файла --- Infect_file proc clc ;Пока просто сбросим флаг переноса. ;Типа, заразили файл успешно! ;Потом добавим все, что нужно... ret Infect_file endp ; Процедура инициализации вируса Init: mov es,Seg_move ;ES - сегмент, куда будем перемещать код вируса, mov di,100h ;DI - смещение mov cx,offset Finish-100h ;CX - количество перемещаемых байт ;CX = конец нашего вируса - 100h (PSP) ;Т.е. CX = длина нашего вируса в байтах mov si,100h ;DS:SI откуда перемещать будем rep movsb ;перебрасываем нашу программу в область ;7 видеостраницы ; ___________________________________________________ ; !!! Теперь ВНИМАТЕЛЬНО следим за CS в отладчике !!! ; ___________________________________________________ jmp dword ptr cs:[Off_move] ;Прыгаем куда переместили (фактически на ;следующую строку, только уже в сегменте ;0BF00h!) ; Что показал отладчик? Подумайте, что произошло... ; Теперь мы уже в области экрана Lab_jmp: ;Вот сюда-то мы и прыгнули с предыдущей строки! Толко CS теперь ;равен 0BF00h. Внимательно проследите в отладчике за этим... nop ;Это Вам для отладчика (на всякий случай!) nop push cs ;Настроим сегментные регистры pop ds mov Seg_return,ss ;Запомним сегмент для возврата. ;SS-то остается прежним! mov ah,1Ah ;Установим DTA для поиска файлов xor dx,dx ;Он устанавливается на тот адрес, который содержится int 21h ;в регистрах DS:DX. В отладчике посмотрите, ;что находится в памяти на которую указывают данные ;регистры, т.е. DS:DX... ;После выполнения следующей процедуры там будет ;находиться что-то ОЧЕНЬ интересное... call Find_first ;Ищем первый файл jc Nomore_files ;Нет COM-файлов - на выход Inf_file: call Infect_file ;Нашли - пробуем заразить jnc Nomore_files ;Удалось заразить - выходим call Find_next ;Не удалось заразить - ищем следующий jnc Inf_file ;Нашли еще один COM-файл; пробуем заразить... Nomore_files: jmp dword ptr cs:[Off_return] ;Возвращаемся в сегмент программы... ;Интересно, а что отладчик говорит по поводу этого jmp'а? ;Возможно, сегментные регистры помогут? ;Теперь мы уже в сегменте зараженной программы... ;Только что произошло самое важное! Lab_return: push cs ;Восстановим сегментные регистры... push cs pop ds pop es mov ah,1Ah ;Восстановим DTA mov dx,80h int 21h ret ;Выходим в DOS... Finish equ $ ;Метка конца программы-вируса CSEG ends end Begin

Отправлен: 26.06.2007, 21:52 Вопрос задал: Покритюк Виталий Леонидович (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 5)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Покритюк Виталий Леонидович! Причина в этой команде jmp dword ptr cs:[Off_move] для перехода используется 4-е байта т.е. 2-а байта в IP и 2-а байта в CS, длинный переход в другой сегмент, и этих переменных: Off_move dw offset Lab_jmp;Смещение и Seg_move dw 0BF00h;сегмент адреса, куда будем прыгать итого в IP будет адрес метки Lab_jmp, а в CS будет 0BF00h. Это Вам показывает отладчик. Удачи! --------- И только наступив на грабли мы преобретаем драгоценный опыт!

Ответ отправил: Зенченко Константин Николаевич (статус: Практикант) Ответ отправлен: 26.06.2007, 22:05 Оценка за ответ: 3 Комментарий оценки: Спасибо огромное за такие быстрые ответы!!!

Вопрос № 93.020

Здравствуйте! Возможно, мой вопрос не покажется вам заслуживающим внимания, но тем не менее я не могу до конца разобраться с командой test и прошу вашей помощи. test операнд_1,операнд_2 — операция проверки (способом логического умноже- ния). Команда выполняет поразрядно логическую операцию Я над битами опе- рандов операнд_1 и операнд_2. Состояние операндов остается прежним, изме- няются только флаги ZF, SF, и PF, что дает возможность анализировать состояние отдельных битов операнда без изменения их состояния в исходных операндах Во многих источниках рассматривается команда test EAX, EAX, как определитель нуля в данном регистре ("... а не ноль ли в EAX"). Правильно ли я понимаю, что данная команда сработает только при наличии нуля в EAX, при любых других значениях этого не произойдёт. Какой смысл сравнивать содержимое регистра само с собой, если результат будет только при нулевом значени регистра? (Я не подвергаю это сомнению, я прошу объяснить смысл). Заранее прошу прощения за возможно глупую интерпретацию данного вопроса, но если бы я это поннимал, то наверняка такой вопрос не задал бы. Ведь я только начинаю изучать Assembler. Спасибо всем, кто откликнется

Отправлен: 27.06.2007, 00:28 Вопрос задал: Federal (статус: 1-ый класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Олег Владимирович Здравствуйте, Federal! Действительно, странная формулировка "сработает только при...". Сработает-то она всегда, процессор ничего против test не имеет. :) Если мы имеем своей целью различить случаи EAX == 0 и EAX != 0, то test eax, eax поможет - ведь при eax == 0 она устанавливает zf = 1, при eax != 0 zf = 0. Если же нужно проверить, EAX == 24 или EAX != 24, то test тут, конечно, не подходит. Здесь нужна простая универсальная CMP EAX, 24. Почему же cmp eax, 0 обычно не применяют в случае проверки на ноль? Можно и её, но просто test eax, eax короче - всего два байта. :) Далее, если нам надо проверить, установлен ли нулевой бит в EAX, применяется test eax, 1, после чего опять-таки смотрят на ZF: ZF = 0 при установленном в 1 бите, ZF = 1 при сброшенном в 0. Догадайтесь, что делает test eax, 0FFFFFFFFh? Правильно, проверяет, установлен ли хоть один бит в EAX, т.е., в сущности, не ноль ли в аккумуляторе. Но эта команда опять-таки длиннее test eax, eax. Ну и напоследок. Многие команды (add, sub, cmp, and, or, xor, adc, sbb, xadd, inc, dec, shl, shr, sar, ...) устанавливают флаги в соответствии с полученным результатом. По ним потом удобно судить о результате - 0 он (ZF), имеет ли знак(SF), и т.п. Но если никаких действий не производилось, например, команда mov eax, [edi] флагов не устанавливает, а хотелось бы, то делают холостую операцию только ради установки флагов в соответствии с результатом. Если хочется установить флаги в соответствии с состоянием eax, нужно придумать операцию, результатом которой будет eax. Например, test eax, eax, или or eax, 0. Они ничего, кроме флагов, не меняют, значение в регистре они не портят, но об этом значении мы можем что-то выяснить по флагам. Если есть ещё вопросы, или если я не так что-то понял - обращайтесь в минифорум, проодлжим. Удачи! --------- Факультет ПМ-ПУ - лучший в СПбГУ!

Ответ отправил: Олег Владимирович (статус: Студент) Ответ отправлен: 27.06.2007, 01:23 Оценка за ответ: 5

Вопрос № 93.091

Добрый день! Я учу Ассемблер по рассылке "Ассемблер? Это просто! Учимся программировать" и никак не могу понять, почему Check_video proc главы 11 так сильно отличается от Check_video proc главы 14. Check_video proc mov ah,0Fh int 10h cmp al,3 ;Текущий режим монитора текстовый? je Ok_video mov ax,3 ;Если нет - делаем текстовый int 10h Ok_video: cmp bh,0 ;Нулевая страница? jz Ok_page mov ax,0500h ;Если нет - делаем нулевую текущей int 10h Ok_page: ret Check_video endp Check_video proc mov ah,0Fh int 10h cmp al,3 ;Текстовый режим? je Ok_video mov ax,3 ;Если нет - делаем текстовый int 10h Ok_video: or bh,bh ;Нулевая страница? jz Ok_page mov ax,0500h ;Если нет - делаем нулевую текущей int 10h Ok_page: ret Check_video endp 1. Почему в 11 главе cmp bh,0, а в 14 уже or bh,bh ? 2. А почему 0-ая страница 0500h, а не 0B800h Если не сложно, подскажите, пожалуйста. Удачи! Приложение: ; ; SSHELL.ASM ; ; SShell14.asm - программа к Главе № 14 ; (С) Авторские права на файлы-приложения принадлежат автору книги ; "Ассемблер? Это просто! Учимся программировать под MS-DOS" ; Автор: Калашников Олег Александрович (e-mail: Assembler@Kalashnikoff.ru) ; http://www.Kalashnikoff.ru ; --- Ассемблирование (получение *.com файла) --- ;При использовании MASM 6.11 - 6.13: ;ML.EXE sshell14.asm /AT ;При использовании TASM: ;TASM.EXE sshell14.asm ;TLINK.EXE sshell14.obj /t/x .286 ;Будем использовать команды 80286 процессора CSEG segment assume cs:CSEG, ds:CSEG, es:CSEG, ss:CSEG org 100h Start: jmp Begin ; ======= Процедуры ========= ; Головная include main.asm ; Работа с дисплеем include display.asm ; Работа с файлами include files.asm ; Работа с клавиатурой include keyboard.asm ; Сообщения include messages.asm ; Переменные include data.asm ; Начало программы Begin: call Check_video ;Проверим видеорежим и текущую страницу mov ah,9 mov dx,offset Mess_about int 21h ;Выведем сообщение с приветствием call Main_proc ;Вызывем головную процедуру ;Сюда мы попадем толко в том случае, если пользователь решил выйти в DOS int 20h CSEG ends end Start ; ; DISPLAY.ASM к главе 11 выгладел так: ; ; Проверяем на текстовый режим монитора и на текущую видео страницу Check_video proc mov ah,0Fh int 10h cmp al,3 ;Текущий режим монитора текстовый? je Ok_video mov ax,3 ;Если нет - делаем текстовый int 10h Ok_video: cmp bh,0 ;Нулевая страница? jz Ok_page mov ax,0500h ;Если нет - делаем нулевую текущей int 10h Ok_page: ret Check_video endp ; ; А это DISPLAY.ASM к главе 14 ; ; ===== DISPLAY.ASM - процедуры работы с экраном ====== ; === Рисуем рамку заданного размера в центре экрана === Draw_frame proc push es ;Сохраним ES push 0B800h ;ES должен указывать на сегмент 0-ой видеостраницы pop es ;это сработает только на 286+ процессоре!!! ;________________________________________ ; ; Производим вычисления для того, чтобы ; разместить ЛЮБУЮ рамку в цетре экрана! ; ; Нужно следить НУ ОЧЕНЬ внимательно. ; Без калькулятора не обойтись... ;________________________________________ mov ax,Height_X ;AX = высота нашей рамки shr al,1 ;делим высоту на 2 путем смещения битов вправо на 1 mov dh,11 ;Середина sub dh,al ;DH (строка) ГОТОВА!!!!! mov ax,Width_Y ;AX = ширина нашей рамки shr al,1 ;делим ее на 2 mov dl,39 ;Середина sub dl,al ;DL (колонка) ГОТОВА!!!!! ;Теперь DH содержит центрированный ряд (строку), ;а DL - колонку относительно размеров рамки (окошка)... ;_________________________________________ call Get_linear ;Получаем линейный адрес в видеобуфере из DX, push di ;который и сохраним... mov ah,Num_attr ;В AH - атрибуты цвета mov al,'╔' ;Верхний левый угол... stosw ;Заносим два байта (атрибут в AH / символ в AL) mov al,'═' ;Далее... mov cx,Width_Y ;В CX - ширина рамки rep stosw ;Поехали... mov al,'╗' ;Завершаем верхний ряд stosw pop di ;Восстановим DI + 160 (следующий ряд) add di,160 ;Теперь у нас примерно такая ситуация на экране: ;╔═══════════════════════════╗ ;_ - где _, там у нас DI mov cx,Height_X ;CX - кол-во повторов (высота) Next_lined: push cx ;Сохраним счетчик push di ;Сохраним DI mov al,'║' ;Вывели этот символ (он один) stosw mov al,32 ;32 - пробел (или 20h или ' ') mov cx,Width_Y ;CX = ширина rep stosw ;Поехали! mov al,'║' ;Завершаем ряд... stosw pop di add di,160 ;Переводим DI на следующий ряд pop cx ;Восстановим счетчик loop Next_lined ;Следующий ряд... ;Теперь у нас примерно такая ситуация на экране: ;╔═══════════════════════════╗ ;║ ║ ;║ ║ ;║ ║ ;_ - тут DI mov al,'╚' ;Нижняя часть рамки... stosw mov al,'═' mov cx,Width_Y rep stosw mov al,'╝' stosw pop es ;Восстановим ES ;Теперь у нас примерно такая ситуация на экране: ;╔═══════════════════════════╗ ;║ ║ ;║ ║ ;║ ║ ;╚═══════════════════════════╝ ret ;Вот мы и написали одну очень мощную процедуру, которой можно пользоваться ;в любое время и вставлять в любую программу. Хотя, мы еще будем много чего ;добавлять в нее: усовершенствовать, автоматизировать, ускорять и пр. ;Как я уже говорил: стоит один раз написать, а потом... Draw_frame endp ; === Преобразование DH:DL в линейный массив === Get_linear proc push ax ;Сохраним все используемые регистры push bx push dx shl dl,1 ;Математика: умножаем DL на 2 (DL=DL*2)... mov al,dh ;В AL - ряд, mov bl,160 ;который нужно умножить на 160 mul bl ;Умножаем: AL(ряд)*160; результат --- в AX ;Почему на 160? ;Дело в том, что видеобуфер устроен как линейный (прямой) массив. ;Один символ занимает 2 байта: атрибут/код символ. ;Т.к. в режиме 3 в одном ряду 80 символов, то нам нужно умножить на 160! mov di,ax ;Результат умножения в DI xor dh,dh ;Аннулируем DH add di,dx ;Теперь в DI линейный адрес в видеобуфере... pop dx ;Восстанавливаем регистры... pop bx pop ax ret ;С моей точки зрения - это довольно-таки оптимальный алгоритм... Get_linear endp ; === Проверяем видеорежим монитора и текущую видеостраницу === Check_video proc mov ah,0Fh int 10h cmp al,3 ;Текстовый режим? je Ok_video mov ax,3 ;Если нет - делаем текстовый int 10h Ok_video: or bh,bh ;Нулевая страница? jz Ok_page mov ax,0500h ;Если нет - делаем нулевую текущей int 10h Ok_page: ret Check_video endp ; === Сохраним экран === Save_mainscr proc pusha ;Сохраним ВСЕ регистры (кроме сегментных) в стеке push es ;Сегментные придется сохранить самому... push ds push 0B800h ;С нулевой страницы pop ds xor si,si ;Первого символа push 0B900h ;В первую страницу... pop es xor di,di ;Первый символ... mov cx,2000 ;4000 байт rep movsw ;Делаем копию... pop ds pop es popa ;Восстановим регистры (POP All - вытолкнуть все) ret Save_mainscr endp ; === Восстановим экран === Restore_mainscr proc pusha push es push ds push 0B900h ;С первой видеостраницы pop ds xor si,si push 0B800h ;В нулевую... pop es xor di,di mov cx,2000 rep movsw pop ds pop es popa ret Restore_mainscr endp ; === Прячем курсор, сохранив предварительно его текущую позицию === Hide_cursor proc mov ah,3 ;Получаем текущую позицию курсора mov bh,Video_page int 10h mov Pos_cursor,dx ;Теперь она в DX (отсчет с нуля!) mov ah,2 mov bh,Video_page ;Прячем курсор (установим его на 25 строку (19h)) mov dx,1900h int 10h ret Hide_cursor endp ; === Восстановим курсор === Restore_cursor proc mov ah,2 mov bh,Video_page ;Видеостраница mov dx,Pos_cursor ;Сохраненная позиция курсора int 10h ;Установим (позиционируем) курсор ret Restore_cursor endp

Отправлен: 27.06.2007, 15:34 Вопрос задал: Покритюк Виталий Леонидович (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Покритюк Виталий Леонидович! 1) Команды cmp bh,00h и or bh,bh делают одно и тоже, а именно устанавливают флаг ZF, в первом случае содержимое регистра сравнивается с числом, при равенстве ZF=1, во втором случае регистр проверяется сам с собой, при bh=00h флаг ZF=1. Вместо or bh,bh можно использовать команду and bh,bh, при проверке на ноль они делают одно и тоже 2) mov ax,0500h- это AH=05h фунцция прерывания 10h BIOS, устанавливает видео страницу, номер которой указан в AL=00h. 0B800h-это сегментный адрес видеобуфера, обычно он используется при прямой записи в видеобуфер. mov bx,0B00h mov ex,bx mov cx,50 xor di,di mov ax,1401h;синий фон красная мордочка cld rep stosw на экране появятся 50 мордочек Удачи! --------- И только наступив на грабли мы преобретаем драгоценный опыт!

Ответ отправил: Зенченко Константин Николаевич (статус: Практикант) Ответ отправлен: 27.06.2007, 16:31 Оценка за ответ: 5 Комментарий оценки: Огромное спасибо! Удачи!

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