Hack este sitio!

[ Advertise With HackThisSite.org :: Hide These Ads ] [Anúnciate con HackThisSite.org:: Ocultar estos anuncios]

"If the flag needs protection at all, it needs protection from members of Congress who value the symbol more than the freedoms that the flag represents." "Si la bandera de las necesidades de protección en todo, las necesidades de protección de los miembros del Congreso que valoran el símbolo más de las libertades que la bandera representa". --US Rep. Jerrold Nadler, D - NY - US Rep Jerrold Nadler, D - NY

Mixing Visual Basic .NET with Assembly Language Mezcla de Visual Basic. NET con lenguaje ensamblador
Published by: Phate , on 2008-06-23 05:29:08 Publicado por: Phate, sobre 2008-06-23 05:29:08
In the modern day of the .NET framework, many users tend to rely heavily on this system which they have become so accustomed to. En el día de moderno. NET Framework, muchos usuarios tienden a depender en gran medida en este sistema que se han vuelto tan acostumbrados. Unfortunately, this system comes with many drawbacks. Lamentablemente, este sistema viene con muchos inconvenientes. The .NET framework allows you to quickly develop applications but in time critical circumstances the bytecode interpreter falls drastically short. . NET Framework le permite desarrollar rápidamente aplicaciones, pero el tiempo es crítico, en circunstancias, el intérprete de bytecode cae drásticamente corto. In the following document, I will present you with a scenario in which you might wish to use a low level language to preform a time critical procedure for your .NET application. En el siguiente documento, yo le presentará un escenario en el que usted podría querer utilizar un lenguaje de bajo nivel de preformas a un tiempo crítico para su procedimiento. NET. The languages I will be using in this document will be Visual Basic .NET and Intel Assembly (NASM). Los idiomas que se utilizan en este documento se Visual Basic. NET y la Asamblea Intel (NASM). The Scenario El Escenario As an application developer, you have been selected as part of a development team to design a login screen. Como un desarrollador de aplicaciones, que han sido seleccionados como parte de un equipo de desarrollo para diseñar una pantalla de login. The user should be able to enter their username and password in two seperate controls, then click the "Login" button to connect to the server. El usuario debe ser capaz de introducir su nombre de usuario y contraseña en dos los controles y, a continuación, haga clic en el "Login" para conectar con el servidor. When the "Login" button is selected the password is to be encrypted using a simple in-house hashing algorithm and the username and password are to be stored in global variables named g_strUsername and g_strPassword so they can be used by other developers in the development team. Cuando el "Login" botón se selecciona la contraseña se encripta con una simple in-house algoritmo hash y el nombre de usuario y contraseña que se almacenan en variables globales nombre g_strUsername y g_strPassword a fin de que puedan ser utilizados por otros desarrolladores en el equipo de desarrollo . Getting Started Primeros pasos As with any project, we will start out by creating a Visual Basic .NET Windows Application solution. Como con cualquier proyecto, que comenzará a cabo mediante la creación de un proyecto de Visual Basic. NET solución de aplicación para Windows. Name the solution "LogonScreen" and set the form's Size property to 381,298. Nombre de la solución "LogonScreen" y establecer la forma de la propiedad Tamaño de 381298. Also lets set the name of the form to frmLogon and the title to "Connect to Network". También permite a ajustar el nombre del formulario a frmLogon y el título de "Conectar a la red". With that, our forms properties are set. Con ello, nuestras formas se establecen las propiedades. Next add two labels to the form, one with the Text property set to "Username:" and the other set to "Password:". A continuación añadir dos etiquetas a la forma, uno de ellos con la propiedad Text ajustado a "Nombre de usuario:" y el otro a "Contraseña:". These label's don't need to have their name value's set because we won't be bothering with them in code. Estos etiqueta de la no necesidad de contar con su nombre el valor del conjunto, ya que no se molesta con ellos en el código. If you want to name them, go ahead. Si desea nombre de ellos, adelante. Next add two TextBox controls to the right of the labels that you have just placed on the form. A continuación añadir dos controles TextBox a la derecha de las etiquetas que usted acaba de colocar en el formulario. Set the name of the TextBox control next to the "Username:" label to txtUsername. Establecer el nombre del control TextBox al lado del "Nombre de usuario:" a la etiqueta txtUsername. Set the name of the TextBox control next to the "Password:" label to txtPassword and then set "" as the PasswordChar property. Establecer el nombre del control TextBox al lado de la "Contraseña:" txtpassword etiqueta y luego "" como la PasswordChar propiedad. Next, add a button to the form and name it btnLogin and set it's Text property to "Login". A continuación, agregue un botón a la forma y el nombre btnLogin y establecer que la propiedad Text en "Login". Finally, center align the username and password controls then right align the login button to the password TextBox. Por último, en el centro adaptar el nombre de usuario y contraseña controles se suman luego a la derecha del botón de acceso a la contraseña TextBox. This completes the design phase of our .NET application. Esto completa la fase de diseño de nuestras. NET. Writing the Code Escribir el Código Double-click the login button to bring up code view with the btnLogin_Click handler already filled out for us. Haga doble clic en el botón de acceso para abrir la vista de código con el manejador de btnLogin_Click ya rellenado para nosotros. Before we write our handler we must add two imports; System and System.Runtime.InteropServices. Antes de escribir nuestro manejador hay que añadir dos importaciones; y Sistema System.Runtime.InteropServices. These imports will allow us to create our Cphr586 class of external procedures. Estas importaciones nos permitirá crear nuestra Cphr586 clase de procedimientos externos. So lets look at our code as it is now. Por lo tanto, permite buscar en nuestro código, ya que es ahora. Imports System Imports System Imports System.Runtime.InteropServices Imports System.Runtime.InteropServices Public Class frmLogon Public Class frmLogon Dim g_strUsername As String Dim g_strUsername As String Dim g_strPassword As String Dim g_strPassword As String Private Sub btnLogin_Click(ByVal sender As System.Object, _ Private Sub btnLogin_Click (ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handler btnLogin.Click ByVal e As System.EventArgs) manipuladora de btnLogin.Click End Sub End Sub End Class End Class You'll notice I've also added two global variables to the frmLogon namespace; g_strUsername and g_strPassword. Usted notará que he añadido también dos variables globales a la frmLogon nombres; g_strUsername y g_strPassword. These variables are needed per request by the scenario layed out above. Estas variables son necesarias por petición de la hipótesis establecidas anteriormente. So we added them while we were adding the imports. Por lo tanto, añadido al tiempo que se nos añadiendo las importaciones. Next step will be to create our Cphr586 class to be used by our btnLogin_Click event. El siguiente paso será crear nuestra clase Cphr586 a ser utilizado por nuestros btnLogin_Click evento. This is what allows us to use low level languages such as Assembly in our .NET applications. Esto es lo que nos permite utilizar bajo nivel de lenguas como el nuestro en la Asamblea. NET. Before I discuss this in detail, lets take a quick look at the code. Antes de hablar de ello en detalle, permite echar un vistazo en el código. Public Class Cphr586 Public Class Cphr586 <DllImport("cphr586.dll")> _ _ <DllImport("cphr586.dll")> Public Shared Function _ Función Pública compartida _ Encrypt(ByVal lpszPlainText As String) As Int32 Cifrar (ByVal lpszPlainText As String) Como Int32 End Function End Function End Class End Class This code creates a class namespace in which we can access features of an external dynamically linked library (DLL). Este código crea una clase de nombres en los que podemos acceder a funciones externas de una biblioteca vinculada dinámica (DLL). The first line within the class definition specifies the file in which we would like to import a procedure from. La primera línea dentro de la definición de la clase se especifica el archivo en el que nos gustaría a la importación de un procedimiento. This could be system DLLs or, as we have done here, custom DLLs. Esto podría ser o sistema de archivos DLL, como lo hemos hecho aquí, la costumbre DLL. The following line declares the procedure that we plan to import as a 'Public Shared Function'. La siguiente línea declara el procedimiento que tenemos previsto para la importación como una "Función Pública compartidas». All this means is that the procedure can be used by other classes. Todo esto significa es que el procedimiento puede ser utilizado por otras clases. The next line is our Visual Basic procedure prototype for our imported routine. La siguiente línea es nuestro procedimiento de Visual Basic prototipo de nuestra rutina importados. This tells Visual Basic .NET what arguments can be passed to the procedure and what the return value will be. Esto le dice a Visual Basic. NET qué argumentos se pueden pasar con el procedimiento y cuál es el valor de retorno será. In this scenario we are taking a string value as an argument and returning a 32-bit value in EAX so we use Int32 as our return value. En este escenario que estamos tomando un valor de cadena como un argumento y devolver un valor de 32 bits en EAX por lo que el uso Int32 como valor de retorno. The last two lines simply close everything up. Las dos últimas líneas simplemente cerrar todo. So we add this code to the bottom of our Form1.vb file below the "End Class" line for frmLogon and we save our project before we continue. Así que añadir este código a la parte inferior de nuestro archivo Form1.vb por debajo de la "End Class" para frmLogon línea y guardar nuestro proyecto antes de continuar. Now that we are able to import our routine, we need to write our event handler to grab the value of txtUsername and txtPassword, save the value in txtUsername into g_strUsername, use our external routine to encrypt the value obtained from txtPassword and convert it from a 32-bit hash to a string and store it into g_strPassword. Ahora que estamos en condiciones de importar nuestra rutina, tenemos que escribir nuestro evento para agarrar el valor de txtUsername y txtpassword, guardar el valor en txtUsername en g_strUsername, utilice nuestra rutina externa para cifrar el valor obtenido a partir txtpassword y convertirlo de una De 32-bit hash a una cadena y almacenar en g_strPassword. Also, if either g_strUsername or g_strPassword are empty we should error first instead of trying to assign anything. Además, si bien g_strUsername o g_strPassword están vacías debemos primero error en lugar de tratar de asignar nada. So lets do some code. Por lo tanto, permite hacer algo de código. Imports System Imports System Imports System.Runtime.InteropServices Imports System.Runtime.InteropServices Public Class frmLogon Public Class frmLogon Dim g_strUsername As String Dim g_strUsername As String Dim g_strPassword As String Dim g_strPassword As String Private Sub btnLogin_Click(ByVal sender As System.Object, _ Private Sub btnLogin_Click (ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handler btnLogin.Click ByVal e As System.EventArgs) manipuladora de btnLogin.Click Dim dw32BitHash As Int32 Dim dw32BitHash como Int32 Select Case 0 Select Case 0 Case Me.txtUsername.Text.Length Caso Me.txtUsername.Text.Length Me.txtPassword.Text = "" Me.txtPassword.Text = "" MessageBox.Show("Please enter a valid username.", _ MessageBox.Show ( "Por favor, introduzca un nombre de usuario válido.", _ "Error") Case Me.txtPassword.Text.Length Caso Me.txtPassword.Text.Length Me.txtUsername.Text = "" Me.txtUsername.Text = "" MessageBox.Show("Please enter a valid password.", _ MessageBox.Show ( "Por favor, introduzca una contraseña válida.", _ "Error") Case Else Case Else g_strUsername = Me.txtUsername.Text g_strUsername = Me.txtUsername.Text dw32BitHash = Cphr586.Encrypt( _ dw32BitHash = Cphr586.Encrypt (_ Me.txtPassword.Text.ToString _ _ Me.txtPassword.Text.ToString ) g_strPassword = dw32BitHash.ToString g_strPassword = dw32BitHash.ToString End Select End Select End Sub End Sub End Class End Class Public Class Cphr586 Public Class Cphr586 <DllImport("cphr586.dll")> _ _ <DllImport("cphr586.dll")> Public Shared Function _ Función Pública compartida _ Encrypt(ByVal lpszPlainText As String) As Int32 Cifrar (ByVal lpszPlainText As String) Como Int32 End Function End Function End Class End Class What we've done here isn't that difficult. ¿Qué hemos hecho aquí no es difícil. We have created a Select condition to find out if either Me.txtUsername.Text.Length or Me.txtPassword.Text.Length are equal to 0, if so it clears the opposite TextBox control (just in case) and displays a message box to inform the user of the error. Hemos creado una condición Seleccione para averiguar si bien Me.txtUsername.Text.Length o Me.txtPassword.Text.Length son iguales a 0, por lo que si borra el contrario TextBox control (sólo en el caso) y muestra un cuadro de mensaje a informar al usuario del error. If neither of those conditions are met, we can preform our normal operation. Si ninguna de estas condiciones se cumplen, podemos preformas nuestro funcionamiento normal. First it copies Me.txtUsername.Text into g_strUsername so it will be accessable by the other programmers. En primer lugar, copias Me.txtUsername.Text en g_strUsername por lo que será accesible por los otros programadores. Then Cpher586.Encrypt (our assembly routine) is called using Me.txtPassword.Text.ToString as an argument. Luego Cpher586.Encrypt (nuestra reunión de rutina) se llama Me.txtPassword.Text.ToString utilizando como argumento. The value is returned into a local variable that we created as an Int32 named dw32BitHash. El valor se devuelve en una variable local que hemos creado como un Int32 nombre dw32BitHash. We can then use Visual Basic .NET's conversion utility ToString to help us assign the value to g_strPassword. Podemos utilizar Visual Basic. NET de la utilidad de conversión ToString para que nos ayude a asignar el valor a g_strPassword. And with that we have completed the Visual Basic side of the application. Y con que hemos completado la parte de Visual Basic de la solicitud. We can now use the Build option to create an executable. Ahora podemos utilizar la opción Crear para crear un ejecutable. If you try to run the executable you will find that it won't work, the problem is we don't yet have our cphr586.dll file. Si intenta ejecutar el ejecutable que se encuentra que no funciona, el problema es que todavía no han cphr586.dll nuestro archivo. Below is a copy of the CPHR586.ASM file. A continuación se muestra una copia del archivo CPHR586.ASM. Save this file somewhere in your project folder and follow the steps in the comments to build it. Guardar este archivo en algún lugar de tu carpeta de proyecto y siga los pasos en los comentarios para construirlo. ; ------------------------------------------------------------------------- ; ------------------------------------------------- ------------------------ ; CPHR586.ASM ; CPHR586.ASM ; ------------------------------------------------------------------------- ; ------------------------------------------------- ------------------------ ; Build with: ; Construir con: ; nasm -f win32 cphr586.asm -o cphr586.obj ; NASM-f win32 cphr586.asm-o cphr586.obj ; golink /dll /export Encrypt /entry _main cphr586.obj kernel32.dll ; Golink / dll / exportación Cifrar / entrada _main cphr586.obj Kernel32.dll ; ------------------------------------------------------------------------- ; ------------------------------------------------- ------------------------ cpu 586 cpu 586 extern _lstrlenA@4 externo _lstrlenA @ 4 [section .text] [sección. texto] global _main _main mundial _main: xor EAX, EAX XOR EAX, EAX inc EAX INC EAX ret RET global Encrypt Cifrar mundial ; [EBP+8] - lpszPlainText [EBP +8] - lpszPlainText ; Return Value: 32-Bit Hash ; Valor devuelto: 32-Bit hash Encrypt: Cifrar: push ebp Pulsar ebp mov ebp, esp mov ebp, esp push EBX Pulsar EBX push ESI Pulsar ESI push DWORD [EBP+8] Pulsar DWORD [EBP +8] call _lstrlenA@4 llamada _lstrlenA @ 4 mov ECX, EAX mov ECX, EAX mov ESI, [EBP+8] mov ESI, [EBP +8] cmp ECX, 0 cmp ECX, 0 jne .LT1 JNE. TL1 mov EAX, -1 mov EAX, -1 leave salir ret RET .LT1: xor EAX, EAX . TL1: XOR EAX, EAX xor EBX, EBX XOR EBX, EBX push ECX Pulsar ECX add ECX, ESI añadir ECX, ESI .LT2: cmp ECX, ESI . LT2: cmp ECX, ESI je .LT3 je. LT3 mov BL, BYTE [ESI] mov BL, byte [ESI] shl EAX, 1 SHL EAX, 1 add EAX, EBX añadir EAX, EBX mov EBX, 029Ah mov EBX, 029Ah mul EBX mul EBX inc ESI inc ESI xor EBX, EBX XOR EBX, EBX jmp .LT2 JMP. LT2 .LT3: pop ECX . LT3: pop ECX pop ESI Pop ESI pop EBX Pop EBX add EAX, ECX añadir EAX, ECX leave salir ret RET Final Steps Pasos finales Once you have built the cphr586.dll file, copy the file into the same directory as your executable. Una vez que haya construido el cphr586.dll archivo, copiar el archivo en el mismo directorio que el ejecutable. This should be bin/Release or bin/Debug depending on how you have your project setup. Esto debería ser bin / o liberación bin / Depurar dependiendo de cómo usted tiene su proyecto de instalación. Now run the executable again, enter a username and password, and click Login. Ahora ejecute el ejecutable de nuevo, introduzca un nombre de usuario y contraseña, y haga clic en Iniciar sesión. Nothing happens... No pasa nada ... Try adding a MessageBox.Show(g_strPassword,"Test") to the last line of the btnLogin_Click handler then build, run, and test again. Trate de añadir un MessageBox.Show (g_strPassword, "Test") a la última línea de la btnLogin_Click manejador luego construir, ejecutar y probar de nuevo. Cool huh! Genial eh! You get a string containing a 32-bit hash which shows that the value you passed really was passed through the external procedure. Usted recibe una cadena que contenga una de 32-bit hash lo que demuestra que el valor que realmente pasó fue aprobada a través del procedimiento externo. Conclusion Conclusión As you can see, adding low level routines to Visual Basic .NET is a fairly simple task. Como puede ver, agregar rutinas de bajo nivel a Visual Basic. NET es una tarea bastante simple. What makes it better is, this can also be done through C# and other .NET based languages. Lo que lo hace es mejor, esto también puede hacerse a través de C # y otros. NET idiomas. Because of this, you are capable of making your .NET framework applications run much faster than you previously could. Debido a esto, son capaces de hacer su. NET Framework las aplicaciones se ejecutan mucho más rápido de lo que anteriormente podía. Also imagine having access to all the low level system features which you sometimes find yourself locked away from when dealing with the .NET framework. Imaginar también que tengan acceso a todos los sistema de bajo nivel las características que a veces se encuentra bloqueado desde lejos cuando se trata con el. NET Framework. You could easily write front-ends for system services or ring-0 applications in C# or VB and have all of your system critical code written in C or ASM. Usted podría fácilmente escribir de paquetes de servicios del sistema o anillo-0 aplicaciones en C # o VB y todos los de su sistema crítico de código escrito en C o ASM. I personally don't use .NET programming outside of various class projects, but I hope this document has opened some doors for you. Yo personalmente no uso. NET fuera de la programación de diversos proyectos de clase, pero yo espero que este documento ha abierto algunas puertas para usted. If you find this information useful, all I ask is that you share it with someone and help to keep the information underground alive. Si encuentras esta información útil, todo lo que pedimos es que usted comparte con alguien y ayudar a mantener la información bajo vivo. Regards, Recuerdos, ~Synfire ~ Synfire
Cast your vote on this article Emitir su voto sobre este artículo Note: the order of the votes has been reversed. Nota: el orden de los votos se ha invertido.

Comments: Comentarios:
Published: 9 comments. Publicado: 9 comentarios.

thepowersgang - 09:03 am Monday June 23rd, 2008 thepowersgang - 09:03 horas Lunes 23 de junio, 2008

Nice article, you failed to mention that this method would work for C, Pascal or almost any other language though. Niza artículo, no se menciona que este método de trabajo para C, Pascal o casi cualquier otro idioma, aunque.
Also a slight description of what the assembler code is doing might have been a good idea. También una leve descripción de lo que el código ensamblador está haciendo podría haber sido una buena idea.
Apart from that, a pretty good and useful article. Aparte de eso, una buena y útil el artículo.

c4p_sl0ck - 12:31 pm Saturday July 12th, 2008 c4p_sl0ck - 12:31 pm el sábado 12 de julio, 2008

Overall nice article. En general bueno el artículo. A little more description about the ASM part would be nice. Un poco más acerca de la descripción ASM parte estaría bien.

Uber0n - 04:24 am Tuesday July 15th, 2008 Uber0n - 04:24 horas Martes 15 de julio, 2008

Very good and interesting read ^^ Muy buena e interesante leer ^ ^

prah_kum - 07:48 am Sunday August 03rd, 2008 prah_kum - 07:48 horas del domingo 03a agosto, 2008

Its really very good. Su realmente muy buena. unbelievable .... increíble .... terrific work.. magnífico trabajo ..

simonlee - 11:02 am Saturday August 16th, 2008 simonlee - 11:02 horas Sábado 16 de agosto, 2008

wonderful. maravilloso. thx! THX!

anthro - 05:09 am Friday August 29th, 2008 antro - 05:09 horas Viernes 29 de agosto, 2008

total waste of time. total pérdida de tiempo. why code in .NET at all if you needed the speed? ¿por qué en el código. NET en absoluto si usted necesita la velocidad? it's a bloated byte code language. se trata de un código byte hinchada lengua.

so you know asm? por lo que sabe asm? big deal. gran cosa. your code is sloppy as hell and totally uncommented. su código es descuidado como el infierno y totalmente descomentada. no need to stink up these pages No hay necesidad de fétidas hasta estas páginas

liuyuan - 08:12 am Wednesday September 03rd, 2008 liuyuan - 08:12 horas 03a miércoles septiembre, 2008

anthro, I can't wait for you to write up some articles =] This article was great, but from your comment, it seems like you could do better? antro, no puedo esperar para que usted escribir algunos artículos =] Este artículo fue grande, pero a partir de su observación, parece que puede hacerlo mejor? Please share you knowledge with us noobs :> Gracias por compartir tu conocimiento con nosotros noobs:>

arkaros - 11:13 am Tuesday September 09th, 2008 arkaros - 11:13 am Martes 09 de septiembre, 2008

Any one who say that .NET sux are idiots who dont want to adjust to the future. Toda una que dicen que. NET sux que son idiotas No desea ajustar para el futuro. .NET is fast and easy to learn and there for many people will use it. . NET es rápido y fácil de aprender y no para mucha gente va a usar. I say .NET is the future and that hackers should adjust to the future event tho not relly on it. Digo. NET es el futuro y que los piratas informáticos deben ajustar para el futuro caso de no relly Tho sobre el mismo.

finitelife - 03:10 am Monday September 29th, 2008 finitelife - 03:10 horas Lunes 29 de septiembre de 2008

arkaros, use english. arkaros, la utilización Inglés. Who said that .NET is the future? ¿Quién dice que. NET es el futuro? 'hackers' don't have to adjust to the future... 'hackers' no tienen que ajustar para el futuro ... that just doesn't make sense. que simplemente no tiene sentido. Do you know what words mean? ¿Sabes qué significan las palabras? NM. Phate- good read. Phate bien leer. The asm could use a little commenting, but not too much. La ASM podría utilizar un poco de comentar, pero no demasiado. No point in doing it all for us... Ningún punto de hacerlo todo por nosotros ... :)

This site is the collective work of the HackThisSite staff. Este sitio es el trabajo colectivo de la HackThisSite personal. Please don't reproduce in part or whole without permission. Por favor, no reproducir en parte o su totalidad sin permiso.
Page Generated: Mon, 01 Dec 2008 21:05:28 -0500 Exec: 10 Página de creación: Lunes, 01 diciembre 2008 21:05:28 -0500 Ejec: 10
_{Page loaded in 0.12244 seconds!} _{Page cargado en 0,12244 segundos!}

Donate Donar

Challenges Retos

Get Informed Infórmese

Get Involved ¡Participa!

Communicate Comunicar

About HTS Acerca de HTS

Translate Traducir

Partners Socios