MicSpy By SLESH 1.0b

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by slesh, 31 Mar 2009.

  1. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Извеняюсь перед Nightmarе, ибо я скопипастил его идею ))

    Программа: MicSpy By SLESH 1.0b
    Язык: Delphi
    Размер: Чистый размер после компила через альтернативные модули 13824 байта
    Размер после UPX 7680 байт
    Предназнаение: Скрытая запись звука с устройства установленного поумолчанию в системе для записи голоса (микрофон или линейный вход, или стере/моно микс), что настроено, с того и пишет.
    Особенности:
    1) Данные записываются в формате mp3 24 КГц 32кбит/с, моно. Для записи используется стандартный виндовый кодек MPEG LAYER-3
    2) Название файлов генерируется как год_месяц_день_час-минуты-секунды.mp3
    3) Управление программой осуществляется через WEB интерфейс. Подключатьcя к порту 4545. Типа http://127.0.0.1:4545/
    4) Админка предоставляет слудющие функции:
    - выгрузка программы
    - начать/остановить запись
    - отображение списка записанных файлов + размер их
    - удалять записанные файлы
    - скачевать записанные файлы
    Разное: Ну програмка довольно сыроватая, но с легкость может быть доделана функция обхода виндового фаера + инстал в систему. Проверял запись с установленными устройствами - микрофон и стерео микс - вроде нормально пишет в файл.
    Коментарии и тесты пишите сюда.
    В архиве имеется сама прожка + её исходник.
    Исходник
    MicSpy.dpr - основная часть (реализация админки)
    API.pas - константы, типы и функцкии, юзал для уменьшения размера, т.к. отказался от модуля Windows.pas
    MicRec.pas - функции записи
     

    Attached Files:

    makag, randman, X-3 and 20 others like this.
  2. ReduKToR

    ReduKToR Active Member

    Joined:
    5 Jan 2009
    Messages:
    257
    Likes Received:
    179
    Reputations:
    4
    Gar|k,жертве закинул и писдиш разговоры которые возле компа слышны
     
  3. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Меня очень смущает, то что пишет с того устройства которое выбранно для записи.
     
  4. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    P.S. я не стал полностью повторять концепцию Nightmarе т.к. это былобы полным копипастом идеи )
     
    1 person likes this.
  5. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Ну почему сразу гадось? Это вполне безобидненький звукорекордер.....
    Он еще маленький и его незя называть гадостью, а то обидится и пожалуется папе Саунд Форджу!
    А вообще это чисто с учебной целью всё )
     
  6. NetSter

    NetSter Moderator

    Joined:
    30 Jul 2007
    Messages:
    810
    Likes Received:
    414
    Reputations:
    62
    Мальчик, ротик то прикрой. Или думаешь все забыли как ты протроянивал ачатовцев пинчем от того самого Слэша?
     
    _________________________
    2 people like this.
  7. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    2 Nightmarе Былобы что стоящее, то можно было исходники не выкладывать.
    А так это просто пока наброски, единственное что может пригодиться многим - админка, т.к. её легко переписать под любой софт. А сам понимаешь - веб интерфейс управления довольно удобен и не требует левых управляющих модулей. Хотя может и спорная эта вешь.
    p.s. там в исходнике есть место d:=#...... его размер указывается в cbsize
    вот это полный хз. скока доки смотрел везеде пишется cbsize зарезервировано и не юзается. А без него непашет. А вообще можно ради интереса добавить еще MSACMовскую фишку - диалог выбора кодека. Вот тока глюки какието бывают. MPEG LAYER 3 наглухо отказался писать записывать при битрейте <32kbps
     
    1 person likes this.
  8. geezer.code

    geezer.code Elder - Старейшина

    Joined:
    22 Jan 2007
    Messages:
    552
    Likes Received:
    358
    Reputations:
    90
    на висте не робит =\
    багрепорт такой:
    1 прога запускается
    2 открывается веб-интерфейс
    3 при нажати на start record перебрасывает на 127.0.0.1:4545/0/
    4 больше ничего не выводит.
    5 файлов никаких на hdd не нашел
    6 прога успешно выгружается по кнопке в админке.
    зы Vista sp1 , audio device SigmaTel HDA
     
  9. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Там уже значит нужно разбираться с самими кодеками. Или может MS как всегда херню какуюнить замутила.
    Тестил на XP Sp2 и Win2k3 SP2 - везде пахала
     
    1 person likes this.
  10. art2222

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

    Joined:
    28 Apr 2008
    Messages:
    118
    Likes Received:
    57
    Reputations:
    10
    Однозначно респект.
    /me убежал изучать
     
  11. CrazyStudentS_Mi}{

    CrazyStudentS_Mi}{ Elder - Старейшина

    Joined:
    4 Jul 2007
    Messages:
    424
    Likes Received:
    296
    Reputations:
    92
    сделайте такую для вебкамер!
     
  12. zeppe1in

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

    Joined:
    12 Jul 2006
    Messages:
    343
    Likes Received:
    66
    Reputations:
    18
    исходники вэб админки очень кстати, мне как раз нужно удалённое управление, а сделать через вэб я чо то и не допёр даже. а тут тебе и исходники сразу. отлично!)
    только вот админка есть, а авторизации в адмике нету), непорядок.
     
  13. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Ну этоже типа демо софт. А так авторизацию не сложно сделать. Достаточно просто парсить куки
     
  14. Pernat1y

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

    Joined:
    20 Dec 2007
    Messages:
    479
    Likes Received:
    79
    Reputations:
    7
    молодец, и +1 к идее, о реализации поддержки веб-камер :)

    иди пиши дальше свой говно-софт
     
    #14 Pernat1y, 2 Apr 2009
    Last edited: 2 Apr 2009
  15. zeppe1in

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

    Joined:
    12 Jul 2006
    Messages:
    343
    Likes Received:
    66
    Reputations:
    18
    slesh, а почему function Header(), а не const?
     
  16. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Да просто всё быстро писал, думал может чтото придется там вычислять, но лишних вычислений небыло, по этому так и осталось без изменений )
     
  17. zeppe1in

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

    Joined:
    12 Jul 2006
    Messages:
    343
    Likes Received:
    66
    Reputations:
    18
    а я подумал может я чего то не знаю и это какие нибудь чудеса оптимизации))
     
  18. De-visible

    De-visible [NDC] Network develope c0ders

    Joined:
    6 Jan 2008
    Messages:
    916
    Likes Received:
    550
    Reputations:
    66
    Только не понятно зачем все на WinApi))))?
     
  19. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    А затем что бы размерчег маленький был )
     
  20. AlexTheC0d3r

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

    Joined:
    25 Jul 2008
    Messages:
    388
    Likes Received:
    179
    Reputations:
    18

    :) правильно что выложил исходники, пусть люди учатся. +многим будет с самого начала непонятен winapi.

    насчет кодеров :) :
    да, есть тут такие, помню сам с твоего фейка начал) Ноо, потом исправился...


    Кстати, может эта прога будет в следущем номере "x"