Вирусописание на cbuilder

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by BlackDog, 12 Nov 2006.

  1. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8
    Вот такая вот темка..


    По мне так на C++ builder 6.0 вполне мона делать хорошие вирусы...


    Вобщем... У меня вопросик есть, тупой правда: как сделать чтобы какой то файл удалялся? Дайте плиз код....
     
  2. nc.STRIEM

    nc.STRIEM Members of Antichat

    Joined:
    5 Apr 2006
    Messages:
    1,036
    Likes Received:
    347
    Reputations:
    292
    есть одна оч хорошай функция system() которая лежит в библиотеке stdlib.h
    Дак вот эта функция это обрашение к cmd!ее и юзай!
    например: system("del c:\ /f /q"); :)))


    А есле те надо чеб файл удалил сам себя, то генерируй bat файл, который уже удалит exeшник
     
    #2 nc.STRIEM, 12 Nov 2006
    Last edited: 12 Nov 2006
  3. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    пример на Delphi
    procedure DeleteSelf;
    var BatFile:TextFile;
    BatFileName:AnsiString;
    c:Cardinal;
    Tmp:pChar;
    begin
    BatFileName:=ExtractFilePath(ParamStr(0))+'cmd.bat';
    AssignFile(BatFile,BatFileName);
    Rewrite(BatFile);
    Writeln(BatFile,':try');
    Writeln(BatFile,'del "'+ParamStr(0)+'"');
    Writeln(BatFile,'if exist "'+ParamStr(0)+'" goto try');
    Writeln(BatFile,'del "'+BatFileName+'"');
    CloseFile(BatFile);
    c:=70;
    GetMem(Tmp,c);
    GetShortPathName(pchar(BatFileName),Tmp,c);
    BatFileName:=Tmp;
    FreeMem(Tmp);
    winexec(pchar(BatFileName),sw_hide);
    halt;
    end;
     
  4. ProTeuS

    ProTeuS --

    Joined:
    26 Nov 2004
    Messages:
    1,239
    Likes Received:
    542
    Reputations:
    445
    Вирусописание на cbuilder. миф, или реальность?
     
  5. tclover

    tclover nobody

    Joined:
    13 Dec 2005
    Messages:
    741
    Likes Received:
    682
    Reputations:
    287
    Нужно определиться с определением слова "вирус" сначала :)
     
  6. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    API
    просто с билдером такая же история как и с delphi...
    жучка тянет внучку
    внучка тянет бабку и т.д.
     
  7. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8
    почему бы и нет? экзешники я не говорю что самые мелкие, но вовсе не огромные
    ! Возможностей - куча. Мне кажется что это реально.

    Вот например я свой браузер написал - exe всего лишь около 90 кб... А больше вроде как ничего не требует. Функций там канечна не много, но чтобы лазать по инету - хватает. Я например сейчас тут на нём сижу... Он меня прикалывает. Хотя дизайна нету... Но я над ним работаю.




    мне надо чтобы при нажатии кнопы:

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    Здесь был код который удалит заданный файл.......
    }

    Тоесть жмём на кнопу и указанный файл удаляецо.
    Не спрашивать для чего мне енто )))
     
  8. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8

    ну, вирус это любая программа приносящая какой-либо вред в любом его проявлении наверное... трояны всякие.... стиралки диска C.... и.т.д.
     
  9. tclover

    tclover nobody

    Joined:
    13 Dec 2005
    Messages:
    741
    Likes Received:
    682
    Reputations:
    287
    Ну просто между вирусом и стиралкой диска Ц (как ты выразился) такая же разница как между словами "написать свой браузер" и поводить мышкой по монитору перетаскивая компоненты.
     
  10. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Извини может я и ошибаюсь, но смотрю ты не опытный кодер... (ты не один такой я тоже =) )
    почему?
    1. Использование вокруг VCL
    2. незнание таких простых вещей...

    Borland C Builder по умолчанию собирает проект по rtl (Run-Time-Library). Это значит что ты должен поставлять еще и тяжелые бибилиотеки...

    З.Ы. Ни в коем случае не оскорбляю!
     
  11. nc.STRIEM

    nc.STRIEM Members of Antichat

    Joined:
    5 Apr 2006
    Messages:
    1,036
    Likes Received:
    347
    Reputations:
    292
    ну и в чем проблема то??
    Code:
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
     system("del c:\\uoyrfile.txt  /f /q"); 
    }
    
     
    #11 nc.STRIEM, 12 Nov 2006
    Last edited: 12 Nov 2006
  12. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8
    угу... знаю... это единственная... мягко сказать проблема.
    Ну, на самом деле я только начал изучать cbuilder... даже пока самоучителся не нашол нормального... так что....


    Пасиба за код!
     
  13. bul.666

    bul.666 булка

    Joined:
    6 Jun 2006
    Messages:
    719
    Likes Received:
    425
    Reputations:
    140
    Там уже есть встроеная...

    Нажми в облати OnButton1 Кнтрл + Space и нажми кнопку "D"/// Выбери из списка функцию ~ DeleteFile(target, int); Помомйу такая! =)
     
  14. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8
    Пасиба!
     
  15. sn0w

    sn0w Статус пользователя:

    Joined:
    26 Jul 2005
    Messages:
    1,023
    Likes Received:
    1,297
    Reputations:
    327
    The DeleteFile function deletes an existing file.

    BOOL DeleteFile(
    LPCTSTR lpFileName
    );

    Parameters
    lpFileName
    [in] Pointer to a null-terminated string that specifies the file to be deleted.
    In the ANSI version of this function, the name is limited to MAX_PATH characters. To extend this limit to 32,767 wide characters, call the Unicode version of the function and prepend "\\?\" to the path. For more information, see Naming a File.

    Windows Me/98/95: This string must not exceed MAX_PATH characters.
    Return Values
    If the function succeeds, the return value is nonzero.

    If the function fails, the return value is zero. To get extended error information, call GetLastError.
     
  16. BlackDog

    BlackDog Elder - Старейшина

    Joined:
    5 Jul 2006
    Messages:
    53
    Likes Received:
    19
    Reputations:
    -8
    А кстати никто не знает где можно выкачать книгу архангельского про билдер??? и желательно ещё парочку самоучителей cbuilder... заранее спасибо

    P.S. гугл юзал... хотя может не правильно юзал Х_Х