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

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


+  Foro de elhacker.net
|-+  Programación
| |-+  Ingeniería Inversa (Moderadores: karmany, .:UND3R:., MCKSys Argentina)
| | |-+  Un empujoncito porfa!!!!!
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Un empujoncito porfa!!!!!  (Leído 3,959 veces)
ravotril

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Un empujoncito porfa!!!!!
« en: 12 Junio 2010, 19:52 pm »

Hace semanas que estoy buceando la red para aprender a crackear: He aprendido mucho y ya hecho varios "crackme", pero estoy estancado en un programa hecho en vb.net. Uso Net Reflector pero no se como seguir desde aca:


private void Ok_Click(object sender, EventArgs e)
{
if (this._userName.Text.Trim().Length > 0)
{
this.Authenticate();
}
else
{
MessageBox.Show("Enter a valid username and password.", "Login Error", MessageBoxButtons.OK, MessageBoxIcon.Hand, MessageBoxDefaultButton.Button1);
base.DialogResult = DialogResult.None;
}
}

Esto viene del "ok clik" que a su vez viene del "Login Form"

Por favor se necesita orientaciooon!!!
De antemano muchas gracias,
En línea

Nanocity

Desconectado Desconectado

Mensajes: 124


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #1 en: 12 Junio 2010, 21:01 pm »

Ahí lo único que hace es comprobar que la propiedad text de username, que me imagino que será un TextEdit, tenga un tamaño mayor que cero sin contar los espacios en blanco, vamos, básicamente que no esté vacío.

Si eso se cumple llama a la funcion Authenticate y si no te suelta el chico malo no?

Supongo que tendrás que investigar esa función para ver como sacar el serial.

Un saludo.
En línea

Eran nueve, nueve bajo las tres lunas,
bajo la luz del atardecer de otoño.
Mientras el mundo caía, ellos se alzaban
hacia el corazon de la historia
ravotril

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #2 en: 12 Junio 2010, 23:21 pm »

Uffff, gracias! Ahora veo esto:


Private Sub Authenticate()
    Dim connected As Boolean
    Me.Refresh
    If Not DatabaseConnect.ConnectedSuccessfully Then
        Me.Cursor = Cursors.WaitCursor
        connected = Common.TryConnecting(True)
        Me.Cursor = Cursors.Default
    Else
        connected = True
    End If
    If Not connected Then
        Return
    End If
    Try
        connected = DatabaseConnect.Login(Me._userName.Text, Me._password.Text, Me._provider)
    Catch err As Exception
        MessageBox.Show(("The login failed for the following reason:" & ChrW(13) & ChrW(10) & err.Message), Application.ProductName)
        Return
    End Try
    If Not connected Then
        MessageBox.Show("Invalid login or password.", Application.ProductName)
        goto Label_01D2
    End If
    If ((Not Me._provider Is Nothing) AndAlso Not Me._provider.HasActivation) Then
        MessageBox.Show("This user has not been activated.", Application.ProductName)
        goto Label_01D2
    End If
    If ((Not Me._provider Is Nothing) AndAlso Not Me._provider.HasValidActivation) Then
        MessageBox.Show("This user does not have a valid activation code.", Application.ProductName)
        goto Label_01D2
    End If
    Dim isOK As Boolean = True
    If (DatabaseUpdate.UpdateRequired AndAlso (Common.CurrentProviderSecurityLevel <> SecurityLevel.Administrator)) Then
        MessageBox.Show("The database needs to be converted a new version.  Only users with administrator rights can do so.", Application.ProductName)
        isOK = False
    ElseIf (DatabaseUpdate.UpdateRecommended AndAlso (Common.CurrentProviderSecurityLevel <> SecurityLevel.Administrator)) Then
        isOK = True
    Else
        If (DatabaseUpdate.UpdateRequired AndAlso (Common.CurrentProviderSecurityLevel = SecurityLevel.Administrator)) Then
            If (MessageBox.Show("The database must be updated before you can continue.  Press Yes to update the database now.", Application.ProductName, MessageBoxButtons.YesNo) = DialogResult.No) Then
                isOK = False
                goto Label_018C
            End If
            Try
                isOK = DatabaseUpdate.UpdateDatabase
                goto Label_018C
            Catch exception As Exception
                Common.LogAndDisplayError(exception, "The update process failed")
                isOK = False
                goto Label_018C
            End Try
        End If
        If (DatabaseUpdate.UpdateRecommended AndAlso (Common.CurrentProviderSecurityLevel = SecurityLevel.Administrator)) Then
            If (MessageBox.Show("The database should be updated before continuing.  Press Yes to update the database now.", Application.ProductName, MessageBoxButtons.YesNo) = DialogResult.No) Then
                isOK = True
            Else
                Try
                    isOK = DatabaseUpdate.UpdateDatabase
                Catch exception As Exception
                    Common.LogAndDisplayError(exception, "The update process failed")
                    isOK = False
                End Try
            End If
        End If
    End If
Label_018C:
    If isOK Then
        ConfigurationManager.LocalSettingsProfile.SetValue("Login", "LastUserName", Me._userName.Text)
        MyBase.DialogResult = DialogResult.OK
        Me.Refresh
        MyBase.Close
        Return
    End If
Label_01D2:
    Me._password.SelectAll
End Sub

Realmente entre tantos procedimientos no sé por donde seguir la pista  :-\
En línea

yako-_-

Desconectado Desconectado

Mensajes: 157


Heroes Del Silencio


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #3 en: 13 Junio 2010, 05:54 am »

Hola ravotril!!

Yo soy un novato aun pero buscaria la cadena en olly o la dirección de esta strin  MessageBox.Show("Invalid login or password.", Application.ProductName) y luego con control + R ver desde donde es llamada.

""Invalid login or password.""

PD: esta también puede ser interesante "This user does not have a valid activation code."

un saludo!!
« Última modificación: 13 Junio 2010, 05:56 am por yako-_- » En línea

Para que vivir, pudiendo trabajar los Domingos

                                                                Yako-_-
Иōҳ


Desconectado Desconectado

Mensajes: 563


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #4 en: 14 Junio 2010, 16:11 pm »

si subes el crackme y seguramente te podremo ayudar....

y tambien puedes poner un bp en la api de conparacion de VB que no me acuerdo cual es por que recien estoy viendo crackme de VB :P... pero googlea y listo :P o si no fijate antes del call al msgbox de que lugar esta llamando en el stack y chekea de donde salta justo antes deberia estar la comparacion :P
En línea

Eres adicto a la Ing. Inversa? -> www.noxsoft.net
ravotril

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #5 en: 14 Junio 2010, 19:31 pm »

Amigos,
Aca esta el link para este desafio:

http://www.wiley.com/legacy/therascribe/demo_download.htm

Esta hecho en .Net, por lo que es necesario el uso de Net. Reflector para destriparlo.
Realmente está dificil.

Saludos!!
En línea

Иōҳ


Desconectado Desconectado

Mensajes: 563


Ver Perfil
Re: Un empujoncito porfa!!!!!
« Respuesta #6 en: 15 Junio 2010, 23:13 pm »

Amigos,
Aca esta el link para este desafio:

http://www.wiley.com/legacy/therascribe/demo_download.htm

Esta hecho en .Net, por lo que es necesario el uso de Net. Reflector para destriparlo.
Realmente está dificil.

Saludos!!

mis mas sinceras disculpas no me di cuenta que era una aplicacion version demo pense que era un crackme XD...  seguramente hay muchos con mas level que te pueden ayudar yo recien estoy viendo crackme en VB P-code
En línea

Eres adicto a la Ing. Inversa? -> www.noxsoft.net
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines