Portal •  Foro •  FAQ •  Buscar •  Temas recientes •  Lista de usuarios •  Registrarse •  Conectarse 
Foro » Gambas » General

Averiguar La Dirección De Memoria De Una Variable

Responder al tema

Ir a la página Anterior  1, 2

v3ctor
Citar
Mensajes: 1786 Ubicación: Uruguay
Jueves, 04 Septiembre 2014, 14:31
Objetivo: Re: Averiguar La Dirección De Memoria De Una Variable
jsbsan escribió: [Ver mensaje]

Si haces eso, pierdes el valor de la contraseña. No tiene sentido y no te da seguridad.


a ver:
paso uno el usuario ingresa la contraseña
paso dos esta se encripta y va a un archivo
paso tres se reescribe el lugar de memoria donde esta la contraseña para no dejar rastro de la misma en la memoria
paso cuatro de borra el textbox

donde perdí el valor de la contraseña?

última edición por v3ctor el Jueves, 04 Septiembre 2014, 14:50; editado 1 vez
Perfil MP   Sitio web
jguardon
Citar
Mensajes: 2708 Ubicación: Granada
Jueves, 04 Septiembre 2014, 14:45
Objetivo: Re: Averiguar La Dirección De Memoria De Una Variable
El paso de escribir un fichero de texto no lo entiendo, si luego lo borras. Lo normal es almacenar la contraseña encriptada en una base de datos. Quizás en un fichero, por qué no, pero si no es persistente, ¿cómo se va a comparar la contraseña en el próximo inicio del programa? La memoria donde almacenas esa contraseña se borrará cuando salgas del programa o incluso del procedimiento.

Por otro lado, aunque cambies de posición el puntero que apunta a la dirección de memoria donde guardaste la contraseña, siempre habrá una referencia a ese puntero. No tiene el menor sentido. O yo al menos no lo entiendo...

Saludos

Perfil MP  
vuott
Citar
Mensajes: 2086
Sabado, 02 May 2015, 00:09
Objetivo: Re: Averiguar La Dirección De Memoria De Una Variable
Al conocer la dirección de memoria de una variable, es posible ver o modificar un su byte:

Public Sub Main()

Dim i As Integer
Dim p As Pointer
Dim st As Stream

' Tenemos una variable Integer con este valor:
i = &11223344

' La apuntamos:
p = VarPtr(i)

' Vamos a ver, por ejemplo, el segundo byte (hex = 22) de la variable
' (el orden de byte en el area de memoria del Puntero es Little-endian):
p = p + 2
Print Hex(Byte@(p))


' Ahora vamos a cambiar el segundo byte de la variable con la famosa 'star'... "Memory Stream":
st = Memory p For Write
Write #st, &55 As Byte
st.Close

' Vamos a ver el nuevo segundo byte de la variable:
Print Hex(Byte@(p))

' Vamos a ver el nuevo valor de la variable "i":
p = p - 2
Print Hex(Int@(p)), Hex(i)

End

Perfil MP  
Responder al tema
Ir a la página Anterior  1, 2

Página 2 de 2


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.4155s (PHP: -81% SQL: 181%)
Consultas SQL: 45 - Debug off - GZIP Activado