-
Creo que hay mismo lo dice que es C# o no ?
@Shout
Antes de nada, creo que habría sido mejor si posteases esto en Ingenieria inversa.
Al analizar el ensamblado para comprobar que ofuscador han utilizado se ve que han usado el ofuscador "Crypto obfuscator": http://www.ssware.com/cryptoobfuscator/download.htm
Para desofuscarlo es suficiente con usar "de4dot", o el "SimpleAssembly Explorer", que ya lleva integrado un plugin del "de4dot" y es muy intuitivo de usar porque se asemeja al ".NET Reflector": http://code.google.com/p/simple-assembly-explorer/
Hay dos archivos de recursos, uno es una imágen, la imágen de kenshin, el otro no se que es, pero creo que el archivo que intentas "descifrar" es un recurso que se inyecta al proceso del COD, así que no es ningún archivo de texto ni nada interesante, miagino que solo son bytes que se inyectan al proceso, aunque la verdad es que no sé mucho sobre parches e inyecciones así que tampoco me hagas mucho caso, quizás me equivoque.
Hasta aquí es hasta donde he llegado, no soy un experto en el tema.
(http://img191.imageshack.us/img191/6378/aivr.jpg)
NOTA: Los nombres están así porque según he leido es imposible recuperar los nombres originales al desofuscar, tanto los nombres de los métodos y funciones de las Classes como los nombres de los archivos de las Classes, así que esto es lo que hay y no se puede mejorar, pero al menos es entendible y legible.
Ahora te mostraré una Class desofuscada:
PD: Aquí verás el string "SW52ZXJzZSBUcm9sbGVyKg==", este es Base64 y al revertirlo la codificación devuelve el string "Inverse Troller*"
En VB:
Imports System
Imports System.Collections.Generic
Imports System.IO
Imports System.Reflection
Imports System.Reflection.Emit
Imports System.Text
Namespace A
Friend NotInheritable Class
' Methods
Private Shared Function (ByVal base1 As MethodBase) As Type()
Dim typeArray As Type()
Dim num3 As Integer
Dim infoArray As ParameterInfo() = base1.GetParameters
Dim length As Integer = infoArray.Length
If base1.IsStatic Then
goto Label_002E
End If
Label_0017:
Select Case 6
Case 0
goto Label_0017
Case Else
If (1 = 0) Then
End If
length += 1
Exit Select
End Select
Label_002E:
typeArray = New Type(length - 1) {}
Dim index As Integer = 0
If base1.IsStatic Then
goto Label_0089
End If
Label_0041:
Select Case 5
Case 0
goto Label_0041
Case Else
Dim declaringType As Type = base1.DeclaringType
If Not declaringType.IsValueType Then
Dim type9 As Type = base1.DeclaringType
typeArray(0) = type9
goto Label_0085
End If
Exit Select
End Select
Label_005C:
Select Case 7
Case 0
goto Label_005C
Case Else
Dim type8 As Type = base1.DeclaringType.MakeByRefType
typeArray(0) = type8
Exit Select
End Select
Label_0085:
index += 1
Label_0089:
num3 = 0
Do While (num3 < infoArray.Length)
typeArray(index) = infoArray(num3).ParameterType
num3 += 1
index += 1
Loop
Label_00AD:
Select Case 2
Case 0
goto Label_00AD
End Select
Return typeArray
End Function
Private Shared Sub (ByRef numRef1 As Integer, ByVal info1 As DynamicILInfo)
Dim count As Integer = BitConverter.ToInt32( ., numRef1)
numRef1 = (numRef1 + 4)
If (count <> 0) Then
Dim dst As Byte() = New Byte(count - 1) {}
Buffer.BlockCopy( ., numRef1, dst, 0, count)
Dim startIndex As Integer = 4
Dim num3 As Integer = ((count - 4) / &H18)
Dim i As Integer
For i = 0 To num3 - 1
Dim num10 As Integer = BitConverter.ToInt32(dst, startIndex)
Dim options As ExceptionHandlingClauseOptions = DirectCast(num10, ExceptionHandlingClauseOptions)
startIndex = (startIndex + 20)
Select Case options
Case ExceptionHandlingClauseOptions.Clause
Dim typeToken As Integer = BitConverter.ToInt32(dst, startIndex)
Dim type As RuntimeTypeHandle = ..ResolveTypeHandle(typeToken)
Dim num5 As Integer = info1.GetTokenFor(type)
.(num5, startIndex, dst)
Exit Select
Case ExceptionHandlingClauseOptions.Fault
Throw New NotSupportedException("dynamic method does not support fault clause")
End Select
startIndex = (startIndex + 4)
Next i
Label_00CD:
Select Case 7
Case 0
goto Label_00CD
End Select
info1.SetExceptions(dst)
Return
End If
Label_0018:
Select Case 5
Case 0
goto Label_0018
End Select
If (1 = 0) Then
End If
End Sub
Private Shared Sub (ByVal body1 As MethodBody, ByVal info1 As DynamicILInfo)
Dim helper As SignatureHelper = SignatureHelper.GetLocalVarSigHelper
Dim enumerator As IEnumerator(Of LocalVariableInfo) = body1.LocalVariables.GetEnumerator
Try
Do While enumerator.MoveNext
Dim info As LocalVariableInfo = enumerator.Current
Dim localType As Type = info.LocalType
Dim isPinned As Boolean = info.IsPinned
helper.AddArgument(localType, isPinned)
Loop
Label_0043:
Select Case 5
Case 0
goto Label_0043
End Select
If (1 = 0) Then
End If
Finally
If (enumerator Is Nothing) Then
goto Label_006B
End If
Label_005B:
Select Case 6
Case 0
goto Label_005B
Case Else
enumerator.Dispose
Exit Select
End Select
Label_006B:
End Try
Dim signature As Byte() = helper.GetSignature
info1.SetLocalSignature(signature)
End Sub
Public Shared Sub (ByVal num2 As Integer, ByVal num1 As Integer, ByVal buffer1 As Byte())
buffer1(num1++) = CByte(num2)
buffer1(num1++) = CByte((num2 >> 8))
buffer1(num1++) = CByte((num2 >> &H10))
buffer1(num1++) = CByte((num2 >> &H18))
End Sub
Private Shared Sub (ByRef numRef1 As Integer, ByVal base1 As MethodBase, ByVal info1 As DynamicILInfo)
Dim maxStackSize As Integer = BitConverter.ToInt32( ., numRef1)
numRef1 = (numRef1 + 4)
Dim count As Integer = BitConverter.ToInt32( ., numRef1)
numRef1 = (numRef1 + 4)
Dim dst As Byte() = New Byte(count - 1) {}
Buffer.BlockCopy( ., numRef1, dst, 0, count)
New (base1, dst, info1).
info1.SetCode(dst, maxStackSize)
numRef1 = (numRef1 + count)
End Sub
Friend Shared Sub (ByVal num1 As Integer, ByVal num3 As Integer, ByVal num4 As Integer)
Dim type As Type
Dim base2 As MethodBase
Try
Dim handle As RuntimeTypeHandle = ..ResolveTypeHandle(num1)
type = Type.GetTypeFromHandle(handle)
Dim handle7 As RuntimeMethodHandle = ..ResolveMethodHandle(num3)
Dim declaringType As RuntimeTypeHandle = ..ResolveTypeHandle(num4)
Dim methodFromHandle As MethodBase = MethodBase.GetMethodFromHandle(handle7, declaringType)
Dim obj2 As Object = methodFromHandle
base2 = DirectCast(obj2, MethodBase)
Catch exception3 As Exception
Throw
End Try
Dim fields As FieldInfo() = type.GetFields((BindingFlags.GetField Or (BindingFlags.NonPublic Or BindingFlags.Static)))
Dim info As FieldInfo
For Each info In fields
Try
Dim type8 As Type
Dim num As Integer
Dim expressionStack_D5_0 As String
Dim expressionStack_B3_0 As String
Dim expressionStack_D6_0 As Object
Dim expressionStack_D6_1 As String
Dim expressionStack_C6_0 As String
Dim method As DynamicMethod = Nothing
Dim body As MethodBody = base2.GetMethodBody
Dim parameterTypes As Type() = .(base2)
Dim type6 As Type = base2.DeclaringType
Dim fullName As String = type6.FullName
Dim name As String = base2.Name
Dim text6 As String = (fullName & "." & name & "_Encrypted$")
If TypeOf base2 Is ConstructorInfo Then
expressionStack_D5_0 = text6
goto Label_00D5
Else
expressionStack_B3_0 = text6
End If
Label_00B3:
Select Case 6
Case 0
goto Label_00B3
Case Else
Dim expressionStack_C0_0 As String
Dim expressionStack_BD_0 As String = expressionStack_B3_0
If (1 <> 0) Then
expressionStack_C6_0 = expressionStack_BD_0
Exit Select
Else
expressionStack_C0_0 = expressionStack_BD_0
End If
expressionStack_C6_0 = expressionStack_C0_0
Exit Select
End Select
Dim returnType As Type = DirectCast(base2, MethodInfo).ReturnType
If (returnType OrElse True) Then
expressionStack_D6_1 = expressionStack_C6_0
expressionStack_D6_0 = returnType
goto Label_00D6
Else
expressionStack_D5_0 = CStr(returnType)
End If
expressionStack_D5_0 = expressionStack_C6_0
Label_00D5:
expressionStack_D6_1 = expressionStack_D5_0
expressionStack_D6_0 = Nothing
Label_00D6:
type8 = base2.DeclaringType
method = New DynamicMethod(expressionStack_D6_1, DirectCast(expressionStack_D6_0, Type), parameterTypes, type8, True)
Dim flag2 As Boolean = ..TryGetValue(num1, num)
Dim info2 As DynamicILInfo = method.GetDynamicILInfo
.(body, info2)
.(num, base2, info2)
.(num, info2)
Dim delegate2 As Delegate = method.CreateDelegate(type)
info.SetValue(Nothing, delegate2)
Catch exception4 As Exception
End Try
Next
Label_014A:
Select Case 6
Case 0
goto Label_014A
End Select
End Sub
Shared Sub New()
Dim type2 As Type
If (Not . Is Nothing) Then
goto Label_00D8
End If
Label_000A:
Select Case 5
Case 0
goto Label_000A
Case Else
If (1 = 0) Then
End If
Dim s As String = "SW52ZXJzZSBUcm9sbGVyKg=="
Dim bytes As Byte() = Convert.FromBase64String(s)
s = Encoding.UTF8.GetString(bytes, 0, bytes.Length)
Dim stream As Stream = Assembly.GetExecutingAssembly.GetManifestResourceStream(s)
Dim buffer4 As Byte() = .(&H61, stream)
. = buffer4
. = New Dictionary(Of Integer, Integer)
Dim reader As New BinaryReader(New MemoryStream( ., False))
Try
Dim num As Integer = reader.ReadInt32
Dim i As Integer
For i = 0 To num - 1
Dim num3 As Integer = reader.ReadInt32
Dim num4 As Integer = reader.ReadInt32
..Item(num3) = num4
Next i
Label_00B8:
Select Case 5
Case 0
goto Label_00B8
End Select
Finally
If (reader Is Nothing) Then
goto Label_00D7
End If
Label_00C7:
Select Case 4
Case 0
goto Label_00C7
Case Else
reader.Dispose
Exit Select
End Select
Label_00D7:
End Try
Exit Select
End Select
Label_00D8:
type2 = GetType(MulticastDelegate)
If (type2 Is Nothing) Then
Return
End If
Label_00E6:
Select Case 5
Case 0
goto Label_00E6
Case Else
Dim modules As Module() = Assembly.GetExecutingAssembly.GetModules
Dim moduleHandle As ModuleHandle = modules(0).ModuleHandle
. = moduleHandle
Exit Select
End Select
End Sub
' Fields
Friend Shared ReadOnly As Byte()
Friend Shared ReadOnly As Dictionary(Of Integer, Integer)
Private Shared ReadOnly As ModuleHandle
' Nested Types
Public NotInheritable Class
' Methods
Private Function () As Byte
Return Me.(Me.++)
End Function
Private Function () As Integer
Dim startIndex As Integer = Me.
Me. = (Me. + 4)
Return BitConverter.ToInt32(Me., startIndex)
End Function
Private Function () As Object
Dim num48 As Integer
Dim info2 As MemberInfo
Dim base3 As MethodBase
Dim num As Integer = Me.
Dim nop As OpCode = OpCodes.Nop
Dim metadataToken As Integer = 0
Dim index As Byte = Me.
If (index = &HFE) Then
index = Me.
nop = .(index)
goto Label_0060
End If
Label_0020:
Select Case 6
Case 0
goto Label_0020
Case Else
If (1 = 0) Then
End If
nop = .(index)
Exit Select
End Select
Label_0060:
Select Case nop.OperandType
Case OperandType.InlineBrTarget
Me.(4)
Return Nothing
Case OperandType.InlineField
metadataToken = Me.
Dim info As FieldInfo = Me..ResolveField(metadataToken, Me., Me.)
Dim fieldHandle As RuntimeFieldHandle = info.FieldHandle
Dim num39 As Integer = Me..GetTokenFor(fieldHandle)
Dim size As Integer = nop.Size
Me.(num39, (num + size))
Return Nothing
Case OperandType.InlineI
Me.(4)
Return Nothing
Case OperandType.InlineI8
Me.(8)
Return Nothing
Case OperandType.InlineMethod
metadataToken = Me.
Dim base2 As MethodBase = Me..ResolveMethod(metadataToken, Me., Me.)
Dim method As RuntimeMethodHandle = base2.MethodHandle
Dim type9 As Type = base2.DeclaringType
Dim handle10 As RuntimeTypeHandle = type9.TypeHandle
Dim num36 As Integer = Me..GetTokenFor(method, handle10)
Dim num37 As Integer = nop.Size
Me.(num36, (num + num37))
Return Nothing
Case OperandType.InlineNone
Return Nothing
Case OperandType.InlineR
Me.(8)
Return Nothing
Case OperandType.InlineSig
metadataToken = Me.
Dim signature As Byte() = Me..ResolveSignature(metadataToken)
Dim num33 As Integer = Me..GetTokenFor(signature)
Dim num34 As Integer = nop.Size
Me.(num33, (num + num34))
Return Nothing
Case OperandType.InlineString
metadataToken = Me.
Dim literal As String = Me..ResolveString(metadataToken)
Dim num30 As Integer = Me..GetTokenFor(literal)
Dim num31 As Integer = nop.Size
Me.(num30, (num + num31))
Return Nothing
Case OperandType.InlineSwitch
Dim num4 As Integer = Me.
Me.((num4 * 4))
Return Nothing
Case OperandType.InlineTok
metadataToken = Me.
info2 = Me..ResolveMember(metadataToken, Me., Me.)
If (info2.MemberType = MemberTypes.TypeInfo) Then
Exit Select
End If
Label_02B0:
Select Case 6
Case 0
goto Label_02B0
Case Else
If (info2.MemberType <> MemberTypes.NestedType) Then
If (info2.MemberType = MemberTypes.Method) Then
goto Label_0325
End If
Label_0305:
Select Case 7
Case 0
goto Label_0305
Case Else
If (info2.MemberType <> MemberTypes.Constructor) Then
If (info2.MemberType <> MemberTypes.Field) Then
goto Label_038D
End If
Label_0363:
Select Case 4
Case 0
goto Label_0363
End Select
Dim info3 As FieldInfo = TryCast(info2,FieldInfo)
Dim field As RuntimeFieldHandle = info3.FieldHandle
metadataToken = Me..GetTokenFor(field)
goto Label_038D
End If
Exit Select
End Select
Label_031B:
Select Case 3
Case 0
goto Label_031B
End Select
goto Label_0325
End If
Exit Select
End Select
Label_02CA:
Select Case 7
Case 0
goto Label_02CA
End Select
Exit Select
Case OperandType.InlineType
metadataToken = Me.
Dim type As Type = Me..ResolveType(metadataToken, Me., Me.)
Dim handle12 As RuntimeTypeHandle = type.TypeHandle
Dim num42 As Integer = Me..GetTokenFor(handle12)
Dim num43 As Integer = nop.Size
Me.(num42, (num + num43))
Return Nothing
Case OperandType.InlineVar
Me.(2)
Return Nothing
Case OperandType.ShortInlineBrTarget
Me.(1)
Return Nothing
Case OperandType.ShortInlineI
Me.(1)
Return Nothing
Case OperandType.ShortInlineR
Me.(4)
Return Nothing
Case OperandType.ShortInlineVar
Me.(1)
Return Nothing
Case Else
Dim operandType As OperandType = nop.OperandType
Dim message As String = ("unexpected OperandType " & operandType)
Throw New BadImageFormatException(message)
End Select
Dim type2 As Type = TryCast(info2,Type)
Dim typeHandle As RuntimeTypeHandle = type2.TypeHandle
metadataToken = Me..GetTokenFor(typeHandle)
goto Label_038D
Label_0325:
base3 = TryCast(info2,MethodBase)
Dim methodHandle As RuntimeMethodHandle = base3.MethodHandle
Dim declaringType As Type = base3.DeclaringType
Dim contextType As RuntimeTypeHandle = declaringType.TypeHandle
metadataToken = Me..GetTokenFor(methodHandle, contextType)
Label_038D:
num48 = nop.Size
Me.(metadataToken, (num + num48))
Return Nothing
End Function
Friend Sub ()
Do While (Me. < Me..Length)
Dim obj2 As Object = Me.
Loop
Label_001B:
Select Case 6
Case 0
goto Label_001B
End Select
If (1 = 0) Then
End If
End Sub
Private Sub (ByVal num1 As Integer)
Me. = (Me. + num1)
End Sub
Private Sub (ByVal num2 As Integer, ByVal num1 As Integer)
Me.(num1++) = CByte(num2)
Me.(num1++) = CByte((num2 >> 8))
Me.(num1++) = CByte((num2 >> &H10))
Me.(num1++) = CByte((num2 >> &H18))
End Sub
Shared Sub New()
Dim fields As FieldInfo() = GetType(OpCodes).GetFields((BindingFlags.Public Or BindingFlags.Static))
Dim info As FieldInfo
For Each info In fields
Dim obj2 As Object = info.GetValue(Nothing)
Dim code As OpCode = DirectCast(obj2, OpCode)
Dim num3 As Short = code.Value
Dim index As UInt16 = CUShort(num3)
If (index >= &H100) Then
goto Label_0089
End If
Label_0063:
Select Case 3
Case 0
goto Label_0063
Case Else
If (1 = 0) Then
End If
.(index) = code
Continue
End Select
Label_0089:
If ((index And &HFF00) <> &HFE00) Then
Continue For
End If
Label_0097:
Select Case 7
Case 0
goto Label_0097
Case Else
.((index And &HFF)) = code
Exit Select
End Select
Next
Label_00C8:
Select Case 3
Case 0
goto Label_00C8
End Select
End Sub
Public Sub New(ByVal base1 As MethodBase, ByVal buffer1 As Byte(), ByVal info1 As DynamicILInfo)
' This item is obfuscated and can not be translated.
Dim typeArray2 As Type()
Dim genericArguments As Type()
Me. = info1
Me. = buffer1
Me. = 0
Dim module As Module = base1.Module
Me. = [module]
If TypeOf base1 Is ConstructorInfo Then
goto Label_0050
End If
Label_0032:
Select Case 4
Case 0
goto Label_0032
Case Else
If (1 <> 0) Then
goto Label_0045
End If
genericArguments = base1.GetGenericArguments
If (genericArguments OrElse True) Then
End If
Exit Select
End Select
Label_0050:
genericArguments. = Nothing
If (base1.DeclaringType Is Nothing) Then
goto Label_007C
End If
Label_0060:
Select Case 7
Case 0
goto Label_0060
Case Else
typeArray2 = base1.DeclaringType.GetGenericArguments
If (typeArray2 OrElse True) Then
End If
Exit Select
End Select
Label_007C:
typeArray2. = Nothing
End Sub
' Fields
Private As Byte()
Private As Integer
Private As DynamicILInfo
Private As Module
Private Shared As OpCode() = New OpCode(&H100 - 1) {}
Private As Type()
Private Shared As OpCode() = New OpCode(&H100 - 1) {}
Private As Type()
End Class
End Class
End Namespace
Si quieres ver el resto, bueno, ya te he dicho como hacerlo.
Saludos
.
Cita de: Shout en 7 Julio 2013, 22:50 PM1) Puedes decirme cómo has encontrado eso de "crypto obfuscator"? Quiero saber cómo, no puedo poner un tema por cada cosa que quiera descifrar :D
La aplicaicón "
de4dot" puede detectar el tipo de ofuscación, usa el switch "-d" de esta manera:
de3dot -d "archivo"Cita de: Shout en 7 Julio 2013, 22:50 PM3) ¿Cómo has descifrado el base64? Yo lo descifro y me da una cadena muy rara, ¿es puro base64 o hay más?
Te refieres al archivo, o a la cadena en Base64 de la Class que he comentado?
Imagino que te refieres al archivo de imágen, pues siento desilusionarte pero no lo he llegado a desproteger (por eso no tenía ni p**a idea de lo que era el otro archivo), tampoco me esmeré mucho en intentarlo, símplemente he llegado a la deducción de que como el programa tiene una sola imágen, pues por regla de trés el recurso de 23 kb debe ser esa imágen (por el peso del archivo y el tamaño de la imágen, y porque un programador que se toma tantas molestias también se habrá tomado la molestia de optimizar el peso de la imágen), y el otro recurso (el de 600 kb) debe ser lo que se inyecta.
Cita de: Shout en 7 Julio 2013, 22:50 PM5) Cómo has descifrado esa clase? Qué archivo es?
El como ya lo expliqué, lo desofuscas con el "
Simple Assembly Explorer" (click derecho>desofuscar), y luego el exe desofuscado lo abres (y decompilas) donde quieras, por ejemplo en el
reflector.
No recuerdo el nombre del archivo, ya eliminé la
solución entera.
EDITO: Es la class que mas pesa, si las ordenas en el explorer por tamaño, la primera es.
Un saludo!
Muchas gracias!
Pero me sale esto:
// Microsoft (R) .NET Framework IL Disassembler. Version 3.5.30729.1
// (c) Microsoft Corporation. Reservados todos los derechos.
Módulo protegido: no se puede desensamblar
¿Qué puedo hacer para saltarme la restricción? He leído que hay que "nullear" un byte, pero realmente no sé cuál es. Te agradecería si me dijeses qué proceso hay que seguir para encontrarlo, o al menos alguna pista.
Edito
Se me ha olvidado preguntar: el .exe es un .exe que espera a que un proceso se abra y le inyecta un .dll. ¿Hay alguna manera de "sniffear" lo que el programa envía al juego y así obtener el DLL sin tener que descifrar todo?
Cita de: Shout en 8 Julio 2013, 00:09 AM
¿Qué puedo hacer para saltarme la restricción? He leído que hay que "nullear" un byte, pero realmente no sé cuál es. Te agradecería si me dijeses qué proceso hay que seguir para encontrarlo, o al menos alguna pista.
Yo ya no puedo ayudarte más, mis conocimientos sobre el reversing llega hasta aquí.
PD: Pero tienes que nullear
todos los bytes de los ops, lo leí en algún tutorial hace tiempo.
Cita de: Shout en 8 Julio 2013, 00:09 AM¿Hay alguna manera de "sniffear" lo que el programa envía al juego y así obtener el DLL sin tener que descifrar todo?
La dll desprotegida pasa diréctamente por un stream de la memória, supongo que ese stream lo podrás capturar y guardarlo, pero ni idea de como, quizás con el
Ollydbg será muy fácil de hacer (para quien sepa hacerlo).
Lo que si te puedo decir con toda seguridad es que un simple Base64 no es, aparte de la ofuscacion de los strings, los recursos están encr
yptados y además comprimidos, así que... ahí hay tarea para desprotegerlo.
Si quieres llegar hasta el fondo del asunto, o esperas un milagro de una repsuesta de un Pro, o quizás tengas más suerte si le preguntas al desarrollador del ofuscador en persona:
http://stackoverflow.com/users/51919/logicnp
http://www.ssware.com/support.htm
Un saludo.
Cita de: Shout en 7 Julio 2013, 22:50 PM
@SγиtαxEяяoя odio cuando la gente no lee la pregunta. El proyecto C# ya lo he descifrado, lo que me hace falta son los archivos que están cifrados (no compilados) dentro del mismo.
:huh: :huh: lo siento, igual tambien odio cosas y personas pero no vale amargarse la vida por ellas ;) Enserio he leido todo el post y no veo que hallas dicho que es C# solo esto "_.cs" nada mas, es evidente :-[ pero bueno soy un novato apenas estoy empezando uno trata de ayudar en lo que puede y solo recibes un odio :( pff no vengo aqui hacer amistades
@SγиtαxEяяoя
La pregunta trata sobre métodos de encryptación e ingeniería inversa, pero tu soltaste la frase de: "eso es C#", fue un poco chistoso xD, creo que dijiste lo primero que se te pasó por la cabeza sin entender la pregunta y el problema, pero con intención de ayudar ...eso es lo que cuenta.
...A todos nos ha pasado, no hay que sofocarse. ;)
Saludos