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

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


  Mostrar Temas
Páginas: 1 2 3 4 5 6 [7] 8 9 10 11
61  Programación / Scripting / [Python] Sockets en Python [+Ejemplos y Ejercicios] en: 9 Febrero 2009, 13:59 pm
Sockets en Python with Erik#

Aqui, en este mini taller, curso... como querais llamarle aprenderemos lo basico sobre sockets, Conexion, Envio de mensajes, Recibo de mensajes, Cerrar conexiones, Aceptar conexiones... y sin teorias de la conectividad, etc... 0 Teoria - 100 Practica.

PD: Estoy creando el post, cuando lo acabe lo cuelgo. (Entre hoy o mañana :))
62  Programación / Scripting / [vbs] Borrar Msn NetZeek en: 6 Febrero 2009, 22:47 pm
Bueno, el anti netzeek esta inhabilitado (el que ofrecia el-brujo(alex)) y me decidi a crear el mio, no lo he probado, pero, decirme si esta bien logicamente, o mal. (la variable whs ya se que tendria que ser wsh xD).

Código
  1. Set whs = createobject("WScript.shell")
  2. Set fso = createobject("scripting.filesystemobject")
  3. unidad = inputbox("Cual es tu principal unidad de disco duro" & vbNewLine & "Por ejemplo: C:\, D:\, E:\...","Seleccione su unidad","")
  4. whs.regdelete("HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Windows Update")
  5. fso.deletefile unidad & "Windows\csrss.exe"
  6. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Windows")
  7. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\System")
  8. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\System Update")
  9. fso.deletefile unidad & "Windows\services.exe"
  10. fso.deletefile unidad & "WINDOWS\system32\Drivers\lsass.exe"
  11. fso.deletefile unidad & "WINDOWS\system32\Drivers\smss.exe"
  12. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Windows Run Service")
  13. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\System Run")
  14. fso.deletefile unidad & "Windows\winlogon.exe"
  15. fso.deletefile unidad & "Windows\system32\drivers\spoolsv.exe"
  16. whs.regdelete ("HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\CTFMON")
  17. fso.deletefile unidad & "Windows\system32\drivers\ctfmon.exe"
63  Programación / Scripting / (Un)Hide Files 2 - .VBS en: 6 Febrero 2009, 14:56 pm
Este es un pequeño script que oculta y desoculta ficheros.

Bugs (No es un bug pero es un pequeño problema):
- Los ficheros ya ocultados tienes que saberte el nombre y la extensión para desocultarlo (UnHide)

Código:
Código
  1. set objshell = createobject("wscript.shell")
  2. Set objdialog = createobject("useraccounts.commondialog")
  3. Set objfso = createobject("scripting.filesystemobject")
  4. Msgbox "(Un)Hide Files 2" & vbNewLine & "by Erik#",vbInformation,"Ghost Files 2"
  5. opc = inputbox("1.Ocultar archivo" & vbNewLine & "2.Desocultar archivo","Menú de selección","")
  6. if opc = 1 then
  7. objdialog.filterindex = 1 
  8. objdialog.initialdir = "C:\" 
  9. odresp = objdialog.showopen
  10. Set objfso = createobject("scripting.filesystemobject")
  11. Set archivo = objfso.getfile(objdialog.filename)
  12. archivo.attributes = 2
  13. Elseif opc = 2 then
  14. objdialog.filterindex = 1 
  15. objdialog.initialdir = "C:\" 
  16. odresp = objdialog.showopen
  17. Set archivo = objfso.getfile(objdialog.filename)
  18. archivo.attributes = 0
  19. Else
  20. msgbox "ERROR: Seleccione una opcion real",vbCritical,"ERROR"
  21. End If
64  Programación / PHP / GD REMOTE ADDR en: 18 Enero 2009, 22:13 pm
Bueno, es una simple imagen con librerias GD que crea con la ip del usuario que ve la imagen :)

Código
  1. <?php
  2.  
  3. header("Content-type: image/png");
  4.  
  5. $im = imagecreate(150, 35);
  6.  
  7. $fondo = imagecolorallocate($im, 0, 0, 0);
  8. $texto = imagecolorallocate($im, 255, 255, 255);
  9. imagestring($im, 12, 20, 5, $_SERVER['REMOTE_ADDR'], $texto);
  10.  
  11. imagestring($im, 48, 40, 20, 'by Erik#', $texto);
  12.  
  13. imagepng($im);
  14.  
  15. echo '<img src="remote_addr.php">';
  16.  
  17. ?>
  18.  
  19.  
65  Programación / Scripting / X [Lenguaje parodia] en: 9 Enero 2009, 17:30 pm
Bueno, quien se apunta a hacer un lenguaje parodia tipo brainfuck o Ook, este lenguaje trataria de 1 comando: x, depende de la cantidad de cada unos hace una cosa u otra.
Por ejemplo un hola mundo en X:

Código
  1. >xxxxxxxx>xxxxxxxxxxxxxxxx>xxxxxxxxxxxx>x>->xxxxxxxxxxxxx>xxxxxxxxxxxxxxxxxxxxxx>xxxxxxxxxxxxxx>xxxx>xxxxxxxxxxxxxxxx!

Trataria de mostrar contenidos de texto solamente, por ahora xD: cada > es un comienza de una letra y las x son la cantidad de caracteres en un diccionario por ejemplo en el español la H esta en la posición 8, pues 8 x.
O si buscais un sistema más sencillo decirlo xD
66  Programación / Scripting / Byv Script en: 8 Enero 2009, 13:41 pm
Byv Script

Bueno, antes de nada, llevo tiempo queriendolo empezar, y bueno, Byv Script un nuevo lenguaje de programación interpretado el cual lleva un line commander desde donde pondras
el archivo .byv que deseas abrir, este lenguaje llevara Sockets, Opciones de windows, Flujos de datos, Variables, Funciones, por pena aun no sera POO pero aun esta en crecimiento...

Creador o fundador: Erik#

Y bueno, queria saber si alguien se queria apuntar para crearlo, lo estoy desarollando en C++ pero si saben un lenguaje mejor para desarollarlo porfavor ponerlo aqui.

Todas las sugerencias, comentarios o dudas me encantaria que las pusierais porfavor para poder mejorarlo o poder hacerlo más facil, gracias.
67  Programación / Scripting / Curso de programación en Perl en: 7 Enero 2009, 13:33 pm
Curso de PERL by Erik

1.Introducci?n
Perl es un lenguaje de programaci?n por lotes, viene de C, se ejecuta con las consolas, y se pueden hacer exploits, programas de todo tipo, virus...
Un lenguaje de scripting tipo Batch, Shell unix, Python...
En este cursillo os ense?are todo lo que teneis que saber para ser unos buenos programadores de perl, desde crear un archivo perl, hasta crear un exploit.
Lo primero que vamos a hacer sera descargarnos ActivePerl para windows desde aqui.
Es un enlace directo...
O en linux, nos vamos a nuestro gestor de paquetes y lo buscamos.
Principalmente el curso esta dise?ado para Windows.
Muy bien, procedemos la instalaci?n, y una vez acabada, saltamos al siguiente capitulo.

Atenci?n:

Derechos reservados por la licencia Creative Commons, prohibida la venta de este manual.
68  Programación / Ingeniería Inversa / Errores en MASM con RadASM en: 2 Enero 2009, 12:55 pm
Mirad:

Código
  1. .386
  2. .model flat, stdcall  ;32 bit memory model
  3. option casemap :none  ;case sensitive
  4.  
  5. include CrackMe 1 - Erik.inc
  6.  
  7. .code
  8.  
  9. start:
  10.  
  11. 	invoke GetModuleHandle,NULL
  12. 	mov		hInstance,eax
  13.  
  14.     invoke InitCommonControls
  15. 	invoke DialogBoxParam,hInstance,IDD_DIALOG1,NULL,addr DlgProc,NULL
  16. 	invoke ExitProcess,0
  17.  
  18. ;########################################################################
  19.  
  20. DlgProc proc hWin:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
  21.  
  22. 	mov		eax,uMsg
  23. 	.if eax==WM_INITDIALOG
  24.  
  25. 	.elseif eax==WM_COMMAND
  26. 	.if eax==crackit
  27. 		invoke GetDlgItemText,hWin,1001,Addr serial,10
  28. 		eax serial,'hello'
  29. 		je correct
  30. 		invoke  MessageBox,HWND_DESKTOP,"El serial no es correcto","Incorrecto",MB_OK
  31.         invoke  ExitProcess,0
  32. 		correct:
  33. 		invoke  MessageBox,HWND_DESKTOP,"El serial es correcto","Correcto",MB_OK
  34.         invoke  ExitProcess,0
  35. 	.endif
  36.  
  37. 	.elseif eax==WM_CLOSE
  38. 		invoke EndDialog,hWin,0
  39. 	.else
  40. 		mov		eax,FALSE
  41. 		ret
  42. 	.endif
  43. 	mov		eax,TRUE
  44. 	ret
  45.  
  46. DlgProc endp
  47.  
  48. end start

Me da error en:

Código:
		invoke GetDlgItemText,hWin,1001,Addr serial,10
Código:
		invoke  MessageBox,HWND_DESKTOP,"El serial no es correcto","Incorrecto",MB_OK
Código:
		invoke  MessageBox,HWND_DESKTOP,"El serial es correcto","Correcto",MB_OK
Código:
		eax serial,9519511
69  Programación / Ingeniería Inversa / Host de CracksMe! en: 2 Enero 2009, 10:17 am
Bueno, he creado este host para los que quieren subir sus cracksme, es un enlace directo, sin esperas y sin nada, acordaos de no meter 2 cracksme con el mismo nombre.

Más adelante pondre numeración aleatoria para que no se sobreescriban.

Link del uploader:
http://256kb.com.ar/cracksup.php
70  Programación / Ingeniería Inversa / #1 CrackMe - ErikSharp en: 1 Enero 2009, 17:22 pm
Bueno, os dejo mi primer crackme, trata de que salteis la seguridad y luego enviar el código que se os da a mi por mp.

Dificultad: 1/10

Usuarios que se lo pasaron:
-
-
-
-
-

Link:
http://rapidshare.com/files/178746521/CrackMe_1_eriksharp.exe.html
Páginas: 1 2 3 4 5 6 [7] 8 9 10 11
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines