Блокировка клавиатуры

[Lunatic]

Мучаюсь с блокировкой клавиатуры(с возможностью потом обратно её включать)

Использую BlockInput, но он отключаеться ESC или СTRL+ALT+DEL, отключаю ESC используя SetKeyboardState, но остаёться СTRL+ALT+DEL. Пытался отключить его ключём в реестре DisableTaskMgr, да диспетчер действительно перестаёт выскакывать, но всё равно BlockInput становиться "в позу" false. Также в реестре есть интересный ключик NoWinKeys(Но он работает только после перезагрузки).
Думаю может использовать UnregisterHotKey, но как тогда вернуть всё на своё место?

[ANDLL]

СTRL+ALT+DEL и Win+L не пытайся отключить

DisableTaskMgr

Не отключит ctrl+alt+dell если компьютер членствует в домене

[Williams]

DisableTaskMgr

Не отключит ctrl+alt+dell если компьютер членствует в домене[/quote]
Без вариантов? Где можно почитать об этом?

[Lunatic]

Тогда может есть какой-то иной способ блокировки. Зарезать прерывания к клаве, снести драйвер, незнаю еще какие-то идеи

[iGrok]

Без вариантов? Где можно почитать об этом?

Да как тебе сказать.. В общем, да. Без вариантов.

Просто в домене по Ctrl-Alt-Delete появляется не диспетчер задач, а окно с немного другим функционалом. И вот его ты уже программно, не трогая системные файлы и не прибегая к прочим хакам, на которые матерятся SFC и половина антивирусов никуда не денешь.

Тогда может есть какой-то иной способ блокировки. Зарезать прерывания к клаве, снести драйвер, незнаю еще какие-то идеи

Снести драйвер - это не идея.. Считай, что штатными средствами эту комбинацию отключить невозможно. А на "нештатные" любой антивирус поднимет такой шум, что отключать клавиатуру уже никому не понадобится..

[Williams]

Просто в домене по Ctrl-Alt-Delete появляется не диспетчер задач, а окно с немного другим функционалом.

Тогда в моем случае (ограниченная оболочка) это вполне приемлемо. Одним из требований является блокировка диспетчера. Я думаю большинству людей этого достаточно. Под Вистой при активации этого значения реестра TaskManager просто убирается из меню

не трогая системные файлы и не прибегая к прочим хакам, на которые матерятся SFC и половина антивирусов никуда не денешь.

А про способ с "Джиной", кстати, наслышан

[awl100Alex]

Мучаюсь с блокировкой клавиатуры(с возможностью потом обратно её включать)

Использую BlockInput, но он отключаеться ESC или СTRL+ALT+DEL, отключаю ESC используя SetKeyboardState, но остаёться СTRL+ALT+DEL. Пытался отключить его ключём в реестре DisableTaskMgr, да диспетчер действительно перестаёт выскакывать, но всё равно BlockInput становиться "в позу" false. Также в реестре есть интересный ключик NoWinKeys(Но он работает только после перезагрузки).
Думаю может использовать UnregisterHotKey, но как тогда вернуть всё на своё место?

Во вложении проект блокировки клавиатуры только на текстовый ввод...
Попробуй скомбинировать это с тем что ты написал в начале.

Посмотри еще это...
viewtopic.php?f=51&t=27015

P.S.
А вообще, способ напрочь заблокировать только клавиатуру конечно есть - это значит полностью вместе со всеми функциональными клавишами в том числе Диспетчера задач и прочие, но вот только его не очень приветствуют, поэтому писать об этом нет желания.

[Lunatic]

2 awl100Alex
Пример конечно полезный, но не в этом случае. Исходник библы в студию)

[Lunatic]

Кстати заметил еще один полезный момент, если зажать паралельно Shift либо второй Ctrl, то CAD не срабатывает. Думаю может на момент блокировки программно "зажимать" одну из этих клавишь. Но как это реализовать? Пробовал так:

Код: Выделить всё

Private Type KeyboardBytes
     kbByte(0 To 255) As Byte
End Type

Private Declare Function SetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
Dim kbOld As KeyboardBytes

Private Sub Form_Load()
kbOld.kbByte(16) = 128
kbOld.kbByte(160) = 129
End Sub

Private Sub Timer1_Timer()
SetKeyboardState kbOld
End Sub


Не фурычит. Может что-то со значениями массива туплю

[ANDLL]

Програмно никак не зажать
Есть два общих пути блокировок этих клавиш
1) Написание прослойки-драйвера. В большинстве случаев это криво, и плохо работает с системой в нестандартной конфигурацией, потому что эти прослойки пишут люди не для того что бы работало, а что бы показать что они это могут.
2) Написание своей gina-библиотеки. Это по-моему вполне нормальный способ, но на VB этого делать не стоит(хотя с хакерской addin возможно получится)

[Lunatic]

"Джина" мне не осилить( Разве что кто-то выложит очень-очень-очень детальное описание)
Ах где мой бубен?!)

А если и вправду поставить хук на отлов CAD, или для этого и требуеться написание библиотеки?

[ANDLL]

Какой еще хук?

[Lunatic]

Для отлова нажатия трёх заветных клавишь.

[ANDLL]

И как ты его будешь ставить?

[Lunatic]

Это мои глупые предположения. Я не знаю что делать.

Код: Выделить всё

--------------------------------------------------------------------------------

TaskKeyHook.h

////////////////////////////////////////////////////////////////
// MSDN Magazine — September 2002
// If this code works, it was written by Paul DiLascia.
// If not, I don't know who wrote it.
// Compiles with Visual Studio 6.0 and Visual Studio .NET on Windows XP.
//
#define DLLIMPORT __declspec(dllimport)

DLLIMPORT BOOL DisableTaskKeys(BOOL bEnable, BOOL bBeep);
DLLIMPORT BOOL AreTaskKeysDisabled();



TaskKeyHook.cpp

////////////////////////////////////////////////////////////////
// MSDN Magazine — September 2002
// If this code works, it was written by Paul DiLascia.
// If not, I don't know who wrote it.
// Compiles with Visual Studio 6.0 and Visual Studio .NET on Windows XP.
//
// This file implements the low-level keyboard hook that traps the task
// keys.
//
#define _WIN32_WINNT 0x0500 // for KBDLLHOOKSTRUCT
#include <afxwin.h>         // MFC core and standard components

#define DLLEXPORT __declspec(dllexport)

//////////////////
// App (DLL) object
//
class CTaskKeyHookDll : public CWinApp {
public:
   CTaskKeyHookDll()  { }
   ~CTaskKeyHookDll() { }
} MyDll;

////////////////
// The section is SHARED among all instances of this DLL.
// A low-level keyboard hook is always a system-wide hook.
//
#pragma data_seg (".mydata")
HHOOK g_hHookKbdLL = NULL; // hook handle
BOOL  g_bBeep = FALSE;     // beep on illegal key
#pragma data_seg ()
#pragma comment(linker, "/SECTION:.mydata,RWS") // tell linker: make it
                                                // shared

/////////////////
// Low-level keyboard hook:
// Trap task-switching keys by returning without passing along.
//
LRESULT CALLBACK MyTaskKeyHookLL(int nCode, WPARAM wp, LPARAM lp)
{
   KBDLLHOOKSTRUCT *pkh = (KBDLLHOOKSTRUCT *) lp;

   if (nCode==HC_ACTION) {
      BOOL bCtrlKeyDown =
         GetAsyncKeyState(VK_CONTROL)>>((sizeof(SHORT) * 8) - 1);

      if ((pkh->vkCode==VK_ESCAPE && bCtrlKeyDown) || // Ctrl+Esc
          // Alt+TAB
          (pkh->vkCode==VK_TAB && pkh->flags & LLKHF_ALTDOWN) ||   
          // Alt+Esc
          (pkh->vkCode==VK_ESCAPE && pkh->flags & LLKHF_ALTDOWN)||
          (pkh->vkCode==VK_LWIN || pkh->vkCode==VK_RWIN)) { // Start Menu
         if (g_bBeep && (wp==WM_SYSKEYDOWN||wp==WM_KEYDOWN))
            MessageBeep(0); // only beep on downstroke if requested
         return 1; // gobble it: go directly to jail, do not pass go
      }
   }
   return CallNextHookEx(g_hHookKbdLL, nCode, wp, lp);
}

//////////////////
// Are task keys disabled—ie, is hook installed?
// Note: This assumes there's no other hook that does the same thing!
//
DLLEXPORT BOOL AreTaskKeysDisabled()
{
   return g_hHookKbdLL != NULL;
}

//////////////////
// Disable task keys: install low-level kbd hook.
// Return whether currently disabled or not.
//
DLLEXPORT BOOL DisableTaskKeys(BOOL bDisable, BOOL bBeep)
{
   if (bDisable) {
      if (!g_hHookKbdLL) {
         g_hHookKbdLL = SetWindowsHookEx(WH_KEYBOARD_LL,
            MyTaskKeyHookLL, MyDll.m_hInstance, 0);
      }

   } else if (g_hHookKbdLL != NULL) {
      UnhookWindowsHookEx(g_hHookKbdLL);
      g_hHookKbdLL = NULL;
   }
   g_bBeep = bBeep;

   return AreTaskKeysDisabled();
}




[ANDLL]

Это не будет никак влиять на ctrl+alt+del

[Williams]

Угу, три заветных клавиши нельзя хукнуть по соображениям (видимо) безопасности.

[Lunatic]

Ладно тогда остаёться msgina. Я так понял нас интересует функция WlxLoggedOnSAS (когда чел залогинен и форточки не заблокированы)
Кто знает параметры для "общения" с энтой функцией? (Коль кашу заварили в ВБ, будем пользоваться FireNativeDll)
Итак с чего начнёмс?

[Lunatic]

Если кто-то поможет с китайским)
http://topic.csdn.net/t/20020307/09/559915.html

С декларацией разобрался, даже чё-то там работает, только не понял что

Код: Выделить всё

Private Declare Function WlxLoggedOnSAS Lib "msgina.dll" (pWlxContext As Any, ByVal dwSasType As Long, pReserved As Any) As Long

Public Function DisableClient() As Boolean
        Dim hMutex
        Dim x As String
        x = "_ac952_z_cn_CTRL_ALT_DEL"
        hMutex = WlxLoggedOnSAS(0&, False, StrPtr(x))
        DisableClient = True
        MsgBox "hMutex:   " & hMutex
End Function


Если я правильно понял инструкции MSDN, то должно быть что-то такое

Код: Выделить всё

Const WLX_SAS_TYPE_CTRL_ALT_DEL As Long = 1
hMutex = WlxLoggedOnSAS(0&,WLX_SAS_TYPE_CTRL_ALT_DEL, Null)

[ANDLL]

Судя по всему ты совсем ничего не понял. Это callback-функция, ты ее не вызываешь, ты ее предоставляешь

[Lunatic]

Угадал! Я ничего не понял. Поэтому и прошу чтобы помогли

Ну коль хук на Сtrl+Alt+Del нельзя поставить, может быть его можно поставить на одну из клавишь, или на Ctrl+Alt, тогда ведь комбинация не пройдёт. Или пройдёт?

[iGrok]

Угадал! Я ничего не понял. Поэтому и прошу чтобы помогли

Ну коль хук на Сtrl+Alt+Del нельзя поставить, может быть его можно поставить на одну из клавишь, или на Ctrl+Alt, тогда ведь комбинация не пройдёт. Или пройдёт?

Пройдёт.

[Lunatic]

Нашел пример на Сях(dll инжектится к winlogon). Работает, CAD действительно отключаеться, вот только при нажатии BlockInput снимается всё равно. Пока розбирался с примером(который оказался весьма полезным, но в другой сфере. *мне сейчас не до троянов, но на полочку его отложу*=)), пришёл к другой мысли, хоть и не столь красиво, но главное работает. Блокировка крутится по Do While до тех пор пока на вход не поступит буль. И то что включается taskmgr, это уже не имеет ни какой разницы, так как воспользоваться им не предоставляеться возможным при статичном курсоре мышки и мёртвой клавы)

[Williams]

Пока розбирался с примером(который оказался весьма полезным, но в другой сфере. *мне сейчас не до троянов, но на полочку его отложу*=)),

Троян который блокирует клавиши, это тупой троян, по-скольку хороший ТРОЯН не должен никак выдавать своего присуствия

[awl100Alex]

Lunatic
А что это... у тебя не работает???

[Lunatic]

Пока розбирался с примером(который оказался весьма полезным, но в другой сфере. *мне сейчас не до троянов, но на полочку его отложу*=)),

Троян который блокирует клавиши, это тупой троян, по-скольку хороший ТРОЯН не должен никак выдавать своего присуствия

Да блокировки тут не при чём. Просто есть модуль скрытия процесса в диспетчере задач + функции кейлогера, так вот если последний убрать то VirusTotal не сечёт вообще))

[Lunatic]

Lunatic
А что это... у тебя не работает???

Да зарезать диспетчер задач не проблема. Проблема в другом
Я присвоил BlockInput=False, но If нажали(Ctrl + Arl + Del) Then самопроизвольно BlockInput=True, что мне очень не желательно))

[awl100Alex]

Lunatic
Что-то я никак не пойму... что тебе конкретно нужно и для чего все это.
Тебе нужно отключить клавиатуру, но оставить активной мышку? Или все подряд (и мышку...) отключить полностью?

[Lunatic]

Читай первое сообщение. (Блокировать всё. Хотя можно только клаву)

[awl100Alex]

Lunatic
Все равно непонятно... В самом начале ты стал использовать функцию BlockInput, которая известно что блокирует и мышку и клаву (BlockInput True), но возврат обратно - BlockInput False только в самой проге нужно ставить таймер или Sleep. Так же известно, что BlockInput снимается по Ctrl+Alt+Del - зачем она тогда нафиг нужна вообще непонятно! О чем думали программисты изобретая такую грозную(!) фукцию???!!!
Следовательно, если я правильно тебя понимаю: тебе нужно заблокировать консоль (клавиатура, мышь) подобно функции BlockInput на некоторое время Sleep... но без снятия этой блокировки по Ctrl+Alt+Del???
И на какой клаве предпологается прогу использовать: AT, PS/2, USB???