1
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.
Приветствуем вас,Гость, на форуме IFUD.WS. Обязательно рекомендуется к прочтению правила форума http://ifud.ws/threads/obnovleno-pravila-foruma.7759

Простой пример вызова WinAPI c шифрованием [delphi source]

Тема в разделе "Исходные коды", создана пользователем molotsnk, 27 дек 2012.

  1. TopicStarter Overlay
    molotsnk

    molotsnk Гость

    Хотите повысить беспалевность вашего зверя? Этот пример именно то что вам нужно! Смысл в том что происходит вызов WinAPI функции через обертку, при этом шифруется и название функции и ее параметры.
    Код:
    program DynamiqueAPI;
    uses
      Windows;
     
    type
      TMessageBoxA = function(Handle : Cardinal;
                              lpText : PAnsiChar;
                              lpCaption : PAnsiChar;
                              uType : Cardinal) : Cardinal; stdcall;
     
    function EnDeCrypt(const Value : String) : String;
    var
      CharIndex : integer;
    begin
      Result := Value;
      for CharIndex := 1 to Length(Value) do
        Result[CharIndex] := chr(not(ord(Value[CharIndex]))); 
    {Объявление функции простого обратимого шифрования, желательно заменить на что-то более веселое, типа rc4}
    end;
     
    var
      hUser32 : Cardinal;
      xMessageBoxA : TMessageBoxA;
      sMessageBoxA : PAnsiChar;
    begin
      sMessageBoxA := PAnsiChar(EnDeCrypt('²šŒŒž˜š½‡¾'));
      hUser32 := LoadLibraryA('user32.dll');
      @xMessageBoxA := GetProcAddress(hUser32, sMessageBoxA);
      if Assigned(xMessageBoxA) then
        xMessageBoxA(0, 'Hello World', '', 0);
    {Вызов функции через обертку}
    end.
    
     
    • Like Like x 3
    Метки:
  2. TopicStarter Overlay
    ImDeniil

    ImDeniil Гость

    Да легбез в теме и коменты в коде не помешают
     
  3. TopicStarter Overlay
    molotsnk

    molotsnk Гость

    Что тебе не понятно? Что такое winapi? или что такое шифрование? Если не можешь разобраться с этим примером то потрудись хоть сформулировать вопрос
     
  4. Slowpoke

    Slowpoke

    Регистрация:
    22 авг 2012
    Сообщения:
    303
    Симпатии:
    135
    Я немного не понимаю, почему trevlo разводит флейм уже во второй теме? Это такой эффективный способ набить посты?

    Код интересный, но правда очень бы хотел увидеть подобное, скажем, на c.
     
  5. TopicStarter Overlay
    molotsnk

    molotsnk Гость

    В следующий раз формулируй головой
     
    • Like Like x 1
  6. TopicStarter Overlay
    ImDeniil

    ImDeniil Гость

    Слушай да код хороший не спорю,но не каждому новечку под силу жевать чужой пусть даже и правильно написанный код поэтому добавь побольше коментов в кодинге.Я просто сам начинающий ;)
     
  7. TopicStarter Overlay
    molotsnk

    molotsnk Гость

    На си проблемы нет, достаточно все названия функции давать в зашифрованном виде, прогоняя через функцию, которая расшифровывает в изначальное название. и все) Жизнь стаба увеличивается в разы. Получается что АВ не знает какие ты будешь использовать функции в программе.
    --- добавлено: 27 дек 2012 в 13:41 ---
    Пиши в приват что не понятно попробую объяснить.
     
  8. Slowpoke

    Slowpoke

    Регистрация:
    22 авг 2012
    Сообщения:
    303
    Симпатии:
    135
    Подобное будет работать только при сигнатурном анализе? Или же проактивка тоже не обнаружит?
     
  9. TopicStarter Overlay
    webster

    webster Гость

    Проактивка спалит, сигнатурный нет
     
  10. sudo

    sudo Кулхацкер

    Регистрация:
    1 ноя 2012
    Сообщения:
    38
    Симпатии:
    19
    Где ты проактивку скачал, которая меседжбоксы палит?
     
  11. Slowpoke

    Slowpoke

    Регистрация:
    22 авг 2012
    Сообщения:
    303
    Симпатии:
    135
    Будешь удивлен, но хэллоуворлдовское приложение считается антивирусами зловредным.
     
  12. TopicStarter Overlay
    molotsnk

    molotsnk Гость

    Достаточно поменять фкнцию endecrypt и все бэнч тогда.
     

Поделиться этой страницей

Загрузка...