elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


  Mostrar Mensajes
Páginas: [1]
1  Programación / Programación C/C++ / Problema al enviar combinación de teclas con PostMessage en: 12 Octubre 2016, 16:19 pm
Buenas, estoy intentando hacer un programa para enviar una combinación de teclas (Ctrl+Alt+F12) a un programa en segundo plano, para ello estoy usando la función PostMessage de la API de windows, el caso es que si envío solo F12 o Ctrl funciona (el ALT no) pero si intento usar una combinación de ambas no, el código que estoy usando es este:
Código:
HWND windowHandle = FindWindowA("Qt5QWindowIcon", NULL);   //Can’t find a proccess

    //Send a key
    if( windowHandle ) //This one fails
    {
               PostMessage(windowHandle, WM_SYSKEYDOWN, VK_CONTROL, 0);
               PostMessage(windowHandle, WM_SYSKEYDOWN, VK_MENU, 0);
               PostMessage(windowHandle, WM_KEYDOWN, VK_F12, 0);
               Sleep(1000);
               PostMessage(windowHandle, WM_KEYUP, VK_F12, 0);
               PostMessage(windowHandle, WM_SYSKEYUP, VK_MENU, 0);
               PostMessage(windowHandle, WM_SYSKEYUP, VK_CONTROL, 0);
    }else{
      cout << "No se ha encontrado la ventana!!" << endl;
    }


Por otro lado he intentado con keybd_event y envía bien las teclas, pero si tengo la ventana en primer plano (y no es lo que quiero)
Código:
      keybd_event(VK_CONTROL, 0x9d, 0, 0);
      keybd_event(VK_MENU, 0xb8, 0, 0);
      keybd_event(VK_F12, 0xd8, 0, 0);
      Sleep(1000);
      keybd_event(VK_F12, 0xd8, KEYEVENTF_KEYUP, 0);
      keybd_event(VK_MENU, 0xb8, KEYEVENTF_KEYUP, 0);
      keybd_event(VK_CONTROL, 0x9d, KEYEVENTF_KEYUP, 0);

Se que en el foro habéis hablado ya de estas funciones, pero no logro encontrar el problema de mi código, y simplemente agradeceros vuestra ayuda.


EDITO: Lo he conseguido solucionar, la manera correcta es la siguiente:
Código:
   if( windowHandle ) //This one fails
    {
               PostMessage(windowHandle, WM_SYSKEYDOWN, VK_CONTROL, 0x209d0000);
               PostMessage(windowHandle, WM_KEYDOWN, VK_F12, 0x00d80000);
               Sleep(1000);
               PostMessage(windowHandle, WM_KEYUP, VK_F12, 0xc0d80000);
               PostMessage(windowHandle, WM_SYSKEYUP, VK_CONTROL, 0xe09d0000);
    }else{
      cout << "No se ha encontrado la ventana!!" << endl;
    }

El problema eran los Lparams.
NOTA: La pulsación de la tecla ALT se realiza por medio del Lparam de WM_SYSKEYDOWN.
2  Seguridad Informática / Seguridad / Re: Ayuda para recuperar archivos después del ataque de @correos.net (CryptoLocker) en: 5 Diciembre 2014, 14:30 pm
Si alguien quiere le puedo reenviar el e-mail, es lo que tengo ahora mismo...
Es complicado porque por lo que he leído aunque pone que se han cifrado con cryptolocker en realidad es un torrentLocker y esta puesto para despistar. Aunque claro lees tantas cosas que en realidad no sabes cual creer (Cada uno escribe lo que cree cierto con animo de ayudar, pero como todavía no hay nada claro...).
3  Seguridad Informática / Seguridad / Re: Ayuda para recuperar archivos después del ataque de @correos.net (CryptoLocker) en: 5 Diciembre 2014, 01:07 am
Ya he probado el servicio de esa web, pero al subir un archivo, me dice que no esta infectado con CryptoLocker, supongo que será debido a que es una modificación, ya que ademas de cifrar el archivo, su peso aumenta en 1kB...

PD: Te he enviado un privado
4  Seguridad Informática / Seguridad / Ayuda para recuperar archivos después del ataque de @correos.net (CryptoLocker) en: 4 Diciembre 2014, 23:05 pm
Buenas a todos,

Unos amigos míos que tienen una pequeña empresa, han recibido un e-mail en el que se hacían pasar por correos, este e-mail contenía un enlace a una web que tras rellenar un captcha infectaba el ordenador con una variación del CryptoLocker y como resultado se le han cifrado un montón de archivos, incluso ha llegado a un servidor de archivos que tienen montado.

Cuando se han dado cuenta, han quitado Internet a ese ordenador y lo han apagado y al menos parte del servidor a quedado sin cifrar.

He ido a ver si les podía echar una mano y tras estar toda la tarde no lo he conseguido, he probado la mayoría de programas que existen para descifrarlos, he intentado encontrar en el registro la clave sin éxito. al menos hemos localizado un archivo cifrado, del que tenían una copia sin cifrar...

También he probado el shadowExplorer pero solo hay archivos de hace mas de 1 año...

También me he reenviado el correo por si necesito infectar alguna máquina virtual y vigilar lo que hace.

¿Alguien me puede ayudar y decirme que pasos puedo seguir para intentar solucionarles el problema?
5  Seguridad Informática / Criptografía / Re: Ayuda para resolver un problemilla en: 24 Noviembre 2014, 21:20 pm
Nada, no consigo dar un sentido racional con letras a esos números tampoco, ni con teléfonos ni códigos ni nada.

Pues ya no se que mas hacer, yo tambien creo que debe ser algo sencillo, yo los datos que le había enviado eran de realizar 2 operaciones:

1: Convertir el nombre a números (Usando su ASCII) y eliminando los 0s (Por eso de Sólo te daré un par de pistas; no tengas en cuenta la Ñ y sólo usaremos los números del 1 al 9 para... )
2: Multiplicar por 8008,467024122477 así que creo que lo que nos falta es saber a ciencia cierta la pista de la ñ y creo que tiene algo que ver con el origen de la empresa o algo así... (Busca el origen, pero ojo no es un número)

A lo mejor es ESPAÑA o ESPAÑOL o algo así...
6  Seguridad Informática / Criptografía / Re: Ayuda para resolver un problemilla en: 24 Noviembre 2014, 14:43 pm
Te he enviado un privado con 2 posibles soluciones a ver si eres capaz de interpretarlas tu...
7  Seguridad Informática / Criptografía / Re: en: 24 Noviembre 2014, 12:53 pm
Te suenan los números de teléfono siguientes: 7441*****9 y 6742*****8 si es así te digo como llegar a ellos por privado.
La verdad que como han dicho por aquí arriba faltan conocimientos (de tu trabajo) para poder interpretar los resultados... Y si además entra en juego números de teléfono, no me parece bien ir publicando las cosas por aquí a ver si te suena algo...
8  Seguridad Informática / Criptografía / Re: en: 24 Noviembre 2014, 00:55 am
¿Se te ocurre algún nombre que tenga ñ? Creo que será la división de la parte anterior a la ñ y la parte posterior, sustituyendo las letras por sus códigos ascii
9  Programación / Scripting / Re: [ BATCH ] Efecto visual de escribir lento? en: 24 Noviembre 2014, 00:24 am
Citar
Buenas. Siento revivir un post tan antiguo pero como (creo) que conozco la solución me pareció oportuno postear.
Ya somos 2, he modificado el el script que no imprimía los espacios para que si lo haga:

Código
  1.  
  2. @echo off
  3. mode con cols=100
  4. mode con lines=20
  5.  
  6. call :SLOW aaa     aaaa           aaaa
  7. echo+
  8. echo+
  9. call :SLOW quiero un espacio
  10. pause>nul
  11. goto :eof
  12.  
  13.  
  14. :SLOW
  15. set palabra=%*
  16. if not defined palabra (goto :eof)
  17. set palabra=%palabra: =_%
  18. call:length %palabra%
  19. set /a contt=0
  20. set /a contt2=0
  21. set /a cantcopy=1
  22. if [%tam%] gtr [0] (set /a contt2 +=1)
  23. :loopt
  24. call :AUXILIAR %%palabra:~%contt2%,1%%
  25. if [%aux%]==["_"] (
  26. set /a contt2 +=1
  27. set /a cantcopy +=1
  28. ) else (goto :end1)
  29. if %contt2% leq %tam% (goto :loopt)
  30. :end1
  31. call :SLOW1 %%palabra:~%contt%,%cantcopy%%%
  32. set /a contt +=%cantcopy%
  33. set /a contt2 +=1
  34. set /a cantcopy=1
  35. if %contt% leq %tam% (goto :loopt)
  36. goto :eof
  37. :SLOW1
  38. set char="%1"
  39. set char=%char:_= %
  40. <nul (set /p msg=%char%)
  41. set /a aux2=%cantcopy%
  42. :loopt1
  43. ping -n 1 127.0.0.0 -w 1>nul 2>&1
  44. ping -n 1 127.0.0.0 -w 1>nul 2>&1
  45. set /a aux2 -=1
  46. if %aux2% gtr 0 (goto :loopt1)
  47. goto :eof
  48. :length
  49. set argl=%*
  50. if not defined argl (goto :eof)
  51. set wordl=%argl%
  52. set /a contl=0
  53. :loopt2
  54. if not defined wordl (goto :end2)
  55. set wordl=%wordl:~1%
  56. set /a contl +=1
  57. goto :loopt2
  58. :end2
  59. set tam=%contl%
  60. goto :eof
  61. :AUXILIAR
  62. set aux="%1"
  63. if not defined aux (goto:eof)
  64. goto :eof
  65.  
  66.  

Como veis para poder lograrlo hay que enviar los espacios a la vez que la letra anterior, por lo que si aumentamos mucho el tiempo de espera se verá que los espacios los escribes rápido y las letras despacio, pero es mejor que nada y ademas soporta las multilineas.

Un saludo, espero que a alguien le resulte útil
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines