[delphi] простейший трой на дельфи

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by strab, 9 Mar 2008.

  1. strab

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

    Joined:
    5 Mar 2008
    Messages:
    59
    Likes Received:
    9
    Reputations:
    5
    Подскажите знатоки форума... Если есть примеры простейших троев на дельфи выложте. И сразу по возможности обьясните принцип работы троев... Короче помогите новичку научится писать трои :rolleyes:
     
  2. Jes

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

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    вухх ,полетели ...
    что есть трой в твоём понимании ? что он должен уметь ?
     
  3. strab

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

    Joined:
    5 Mar 2008
    Messages:
    59
    Likes Received:
    9
    Reputations:
    5
    ну допустим простая функция - считывать фаил истории в аси и раз в какое-то время отсылать его
     
    #3 strab, 9 Mar 2008
    Last edited: 9 Mar 2008
  4. ZipaCna

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

    Joined:
    29 Feb 2008
    Messages:
    60
    Likes Received:
    15
    Reputations:
    3
    вот пример простейшего трояна, сервер написан на С, клиент на дельфях

    http://www.rohitab.com/discuss/lofiversion/index.php/t8896.html
     
  5. diehard

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

    Joined:
    30 Sep 2007
    Messages:
    442
    Likes Received:
    266
    Reputations:
    15
    пример: отсылает хистори Квипа, клиент Delphi, сервер php
    http://forum.antichat.ru/thread60448-history+sender.html
     
  6. Jes

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

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    судя по постановке вопроса могу предположить , что гораздо полезнее было бы выложить примеры отдельных действий :

    Чтение из файла [ VCL ]
    http://www.delphisources.ru/pages/faq/base/read_from_file.html
    Чтение из файла [ API ]
    http://www.realcoding.net/article/view/119

    Отправка данных :

    [Отправка почты пример]
    http://sources.ru/delphi/internet/sendmail.htm

    [ Компонент pop3 ]
    http://www.programmersclub.ru/alar-pochovik/

    [Winsock]
    http://irportal.ru/articles/show/articles1.html

    [протокол smtp]
    http://www.codenet.ru/webmast/smtp.php

    [Компоненты для работы с сетью]
    http://programmersforum.ru/archive/index.php/f-3.html
     
  7. strab

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

    Joined:
    5 Mar 2008
    Messages:
    59
    Likes Received:
    9
    Reputations:
    5
    я так понимаю при написании троя тестить на своём компе троя не получится, трой тестится просто на чужок компе... А если допущенны ошибки?
     
  8. Jes

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

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    почему ? ... отладчик (как много в этом звуке ;) )...

    ну или в конце концов если уж ты сам его написал - то ты как то по дефолту знаешь как его обнаружить и обезвредить ... ;)
     
  9. Conquerstador

    Conquerstador Banned

    Joined:
    7 Jul 2007
    Messages:
    124
    Likes Received:
    39
    Reputations:
    -6
    нет кстати можно к этому серьезно отнестись!
    Например чтобы он каждый день в 15:00 открывал к примеру наш пинч, и будут тебе каждый день отчеты в 15:00 одно но комп должен быть включен! :)
     
  10. KindEcstasy

    KindEcstasy Banned

    Joined:
    30 Sep 2006
    Messages:
    105
    Likes Received:
    64
    Reputations:
    54
    VMWare ??? o_O_o ( < инопланитянко )) )
     
  11. _new

    _new New Member

    Joined:
    14 Feb 2008
    Messages:
    5
    Likes Received:
    0
    Reputations:
    0
    На сайте, vx.netlux.ru -> Links, была ссылка на какойто сайт, на котором (уже не помню)
    была коллекция троянов 12 метров чтоли весила, просмотри их, на примере работа
    трояна лучше понимается...
     
  12. Pernat1y

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

    Joined:
    20 Dec 2007
    Messages:
    479
    Likes Received:
    79
    Reputations:
    7
    http://rapidshare.com/files/98723485/Trojan_Legion_rio_Client_v2.0_Final__Delphi_Source__by_Hutley.rar.html
    этот глянь. клиент-серверный

    еще тут http://www.trojanfrance.com/index.php?dir=Sources/Delphi/
    парочка есть
     
    #12 Pernat1y, 11 Mar 2008
    Last edited: 11 Mar 2008
  13. strab

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

    Joined:
    5 Mar 2008
    Messages:
    59
    Likes Received:
    9
    Reputations:
    5
    Всё конечно хорошо, начнём... такая задача...
    Трой должен красть* фаилы из дирректории C:\program files\qip\users\xxxxxxxx\history\
    где xxxxxxxx - это номер уина пользователя... если делать одноразовый трой то xxxxxxxx известен, а если не одноразовый?

    1. Как открывать и считывать фаил я понимаю, я не понимаю как организовать поиск, в папке хисторе лежат текстовые фаилы вида 1232345.txt их там туча, вот как организовать поиск их?
     
    #13 strab, 16 Mar 2008
    Last edited by a moderator: 16 Mar 2008
  14. KEZ

    KEZ Ненасытный школьник

    Joined:
    18 May 2005
    Messages:
    1,604
    Likes Received:
    754
    Reputations:
    397
    А куда отпижженые файлы складывать?
     
  15. strab

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

    Joined:
    5 Mar 2008
    Messages:
    59
    Likes Received:
    9
    Reputations:
    5
    вот я сам думаю куда, в памят складывать, дело не в этом фаилы как искать, я не пойму... что кто нибудь ответит, нет?

    ОТВЕТТЕ, КАК организовать поиск фаилов?
     
  16. Jes

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

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    https://forum.antichat.ru/showpost.php?p=420133&postcount=319
    https://forum.antichat.ru/showpost.php?p=420569&postcount=320
     
    1 person likes this.
  17. De-visible

    De-visible [NDC] Network develope c0ders

    Joined:
    6 Jan 2008
    Messages:
    916
    Likes Received:
    550
    Reputations:
    66
    Папку QIP могут переименовать!Что не есть хорошо, думаю что файл _m_away.txt присутствует только в QIP, опираясь на это организуй поиск этого файла.....
    Затем (Допустим вот путь:С:\Program Files\QIP\Users\xxxxxxx\_m_away.txt )
    Выреж из данной строки '\_m_away.txt' Вот мы и нашли папку:)
    А если есть вероятность, что там не один уин зацикли поиск(С вычеркиванием найденного пути - что бы по 2раза в одну папку не залазил!)
    И отправляй файл на ftpсервер или ящик!