
Быстрый поиск
Введите фрагмент названия статьи для поиска
Задача на применение логических инструкций
16.12.2008 | Категория: Образ мышления: Assembler | Автор: ManHunter
Когда-то кому-то помогал с решением задачи на ассемблере, формулировка задания была такая:
Дан массив из 5 байт. Рассматривая его как массив из восьми 5-битных слов, посчитать количество слов с четным числом единиц в слове.
Алгоритм хитровывернутый, комментарии специально не прописывал, чтобы тупая и ленивая школота не смогла объяснить преподу, откуда взялось такое решение и как оно работает.
Code (Assembler) : Убрать нумерацию
- ;---------------------------------------------------------------
- ; Задача на применение логических инструкций
- ;
- ; Дан массив из 5 байт. Рассматривая его как массив из восьми
- ; 5-битных слов, посчитать количество слов с четным числом
- ; единиц в слове.
- ;
- ; Решение: ManHunter / PCL
- ;---------------------------------------------------------------
- format PE GUI 4.0
- entry start
- include 'win32a.inc'
- ;---------------------------------------------------------------
- section '.data' data readable writeable
- xbytes db 00111000b ; Данные для задачки, взяты с потолка :)
- db 11111110b
- db 01010101b
- db 00001001b
- db 00000110b
- mask db 'Count: %i',13,10,13,10
- db '%i%i%i%i%i - %i%i%i%i%i - %i%i%i%i%i - %i%i%i%i%i',13,10
- db '%i%i%i%i%i - %i%i%i%i%i - %i%i%i%i%i - %i%i%i%i%i',13,10
- db 0
- title db 'Solution',0
- tmp rb 100
- ;---------------------------------------------------------------
- section '.code' code readable executable
- start:
- mov esi,xbytes+4
- loc_1:
- lodsb
- mov ecx,8
- loc_2:
- xor edx,edx
- test al,00000001b
- jz loc_3
- inc edx
- loc_3:
- push edx
- shr al,1
- loop loc_2
- dec esi
- dec esi
- cmp esi,xbytes
- jnb loc_1
- xor eax,eax
- xor esi,esi
- loc_4:
- xor edi,edi
- mov ecx,5
- loc_5:
- add edi,[esp+eax*4]
- inc eax
- loop loc_5
- test edi,edi
- jz loc_6
- test edi,1
- jnz loc_6
- inc esi
- loc_6:
- cmp eax,40
- jb loc_4
- invoke wsprintf,tmp,mask,esi
- add esp,12+(8*5*4)
- invoke MessageBox,HWND_DESKTOP,tmp,title,MB_OK
- invoke ExitProcess,0
- ;---------------------------------------------------------------
- section '.idata' import data readable writeable
- library kernel32,"KERNEL32.DLL",\
- user32,"USER32.DLL"
- include "apia\kernel32.inc"
- include "apia\user32.inc"
Читать статью целиком »
Просмотров: 6038 | Комментариев: 3
Защита от спама на сайтах и форумах
14.12.2008 | Категория: Web-мастеру и не только | Автор: ManHunter

Защита от спама на сайтах и форумах
Проблема спама в комментариях, гостевых книгах, сообщениях на форумах в настоящее время стоит очень остро. Раньше даже простенькая капча или подтверждение регистрации на форуме по e-mail были практически непреодолимым препятствием для спамботов и автосабмиттеров.
Читать статью целиком »
Просмотров: 31403 | Комментариев: 64
Обработка перетаскивания файлов (Drag'n'Drop)
10.12.2008 | Категория: Образ мышления: Assembler | Автор: ManHunter
Если в вашем приложении используется обработка файлов, то кроме открытия через стандартные диалоги выбора файла и каталога, можно получать их из Проводника Windows перетаскиванием. Обработка перетаскивания файлов выполняется в два этапа. При инициализации диалогового окна приложения должна вызываться функция DragAcceptFiles. Параметр функции TRUE разрешает принятие файлов окном, а FALSE его запрещает, так что прием файлов можно регулировать динамически. Непосредственно прием файлов окном выполняется функцией DragQueryFile.Code (Assembler) : Убрать нумерацию
- ; Сегмент кода
- section '.code' code readable executable
- ...
- ; Процедура обработчика окна
- proc DialogProc hwnddlg,msg,wparam,lparam
- ...
- ; Инициализация окна
- cmp [msg],WM_INITDIALOG
- je wminitdialog
- ; Обработка перетаскивания файлов
- cmp [msg],WM_DROPFILES
- je wmdropfiles
- ...
- wminitdialog:
- ; Разрешить окну принимать файлы
- invoke DragAcceptFiles,[hwnddlg],TRUE
- jmp processed
- wmdropfiles:
- ; Обработка полученных файлов. Функция DragQueryFile возвращает имя
- ; файла с указанным индексом (нумерация индексов начинается с нуля).
- ; Для получения общего количества переданных файлов ее надо вызвать с
- ; индексом равным 0FFFFFFFFh
- invoke DragQueryFile,[wparam],0FFFFFFFFh,NULL,NULL
- ; В регистре EAX количество переданных файлов
- ; Перебрать по очереди все переданные окну файлы
- xor ecx,ecx
- process_file:
- push ecx eax
- ; Получить имя файла или каталога в буфер fname
- invoke DragQueryFile,[wparam],ecx,fname,100h
- ...
- ; Тут будет обработчик переданных файлов и каталогов
- ...
- pop eax ecx
- inc ecx
- cmp ecx,eax
- jne process_file
- ; Освободить дескриптор операции
- invoke DragFinish,[wparam]
- ...
После выполнения всех необходимых действий с файлом, надо освободить память, выделенную под файлы, при помощи функции DragFinish.
Читать статью целиком »
Просмотров: 5827 | Комментариев: 2
Готовим свинину в пиве
06.12.2008 | Категория: А еще я туда ем! | Автор: ManHunter

Готовим свинину в пиве
Как я и говорил, мясо я люблю больше шоколада. Поэтому сегодня у меня на обед свинина в пиве.
Читать статью целиком »
Просмотров: 10203 | Комментариев: 4
Фишинг серийников в Blumentals Screensaver Factory
04.12.2008 | Категория: Темная сторона Силы | Автор: ManHunter
При помощи программы Blumentals Screensaver Factory вы можете создавать красивые скринсейверы в виде слайдшоу из ваших фотографий. Саму "фабрику" можно без проблем найти в интернете, но речь сейчас не о ней, а о скринсейверах, которые сделаны с ее помощью. В Blumentals Screensaver Factory есть возможность создания коммерческих скринсейверов, защищенных серийным номером, и некоторые аффтары умудряются торговать подобными дешевками, на создание которых было затрачено всего несколько минут. Такие скринсейверы можно узнать по окну настроек:
Окно настроек скринсейвера
В зависимости от использованной версии "фабрики" вкладок может быть больше или меньше, но общий стиль оформления остается неизменный.
Читать статью целиком »
Просмотров: 6333 | Комментариев: 1


