Busqueda por IMAGEN

[[enecumene]]

Empezado por Delphius

Hola!

Algunas referencias a tener en cuenta:

CRC
MD5
Hash , Sha, Md5 - Página de seoane

Para mayor detalles buscar entre los hilos de seoane.

Saludos,

Vale muy interesantes, gracias amigo Delphius, cuando esté con mas calma le daré una revisada, de nuevo gracias.

Saludos.

[[Delphius]]

Hoy me encontraste un poco inspirado y mi mente medio un ejemplo sencillo de lo que podría ser un algoritmo generador de clave.

No tiene mucha seguridad, ni nada por el estilo... Creería que funcionaría siempre y cuando las imagenes sean muy diferentes. Habría que probar.

La idea que tuve es recorrer la imagen y ponderar los valores RGB según su posición.

El algoritmo que concebí es como sigue:

Código Delphi [-]
function TForm1.GenerarClave(Image: TPicture): integer;
var i,j,k: integer; // coordenadas para movernos por la imagen
                    // k para movernos sobre el canal RGB
    sum, sum_rgb: integer; // suma
    RGB: ^TRGB;
    Bmp: TBitmap;
begin
  if not (Image.Graphic is TBitmap)
     then begin
            Bmp:= TBitmap.Create;
            try
              Bmp.Width:= Image.Width;
              Bmp.Height:= Image.Height;
              Bmp.Canvas.Draw(0,0,Image.Graphic);
              Image.Assign(Bmp);
            finally
              Bmp.Free;
            end;
          end;
  Image.Bitmap.PixelFormat := pf24bit;
  sum := 0;
  for j := 0 to Image.Bitmap.Height - 1 do
    begin
      RGB := Image.Bitmap.ScanLine[j];
      sum_rgb := 0;
      for i := 0 to Image.Bitmap.Width - 1 do
        begin
          // calcular suma RGB
          for k := 1 to 3 do
            sum_rgb := sum_rgb + RGB^[k];
          // vamos guardando las sumas ponderadas en funcion del eje x
          sum_rgb := sum_rgb + (sum_rgb * (i + 1));
          inc(RGB);
        end;
      // volvemos a ponderar la suma, ahora en funcion del eje y
      sum := sum + ((sum + sum_rgb) * (j + 1));
    end;
   result := sum;
end;

siendo TRGB la siguiente estructura:

Código Delphi [-]
TRGB = array[1..3] of byte;

Y un ejemplo de su uso:

Código Delphi [-]
ShowMessage(IntToSTr(GenerarClave(Image1.Picture)));

Como notarás, es un algoritmo demasiado simple... y la clave que genere dependerá mucho del tamaño de la imagen. Pues, cuanto más grande sea, más alto será el valor conseguido.
Si tu deseas obtener un algoritmo que genere claves de un determinado tamaño podría refinarse...

Es tan sólo otra alternativa a tener en cuenta si es que los algoritmos y las fuentes que te pasé te resultan un tanto complicadas.

Puede que otros foristas den un aporte alternativo y/o que esta función sea de base para conseguir algo un poco más elaborado y menos complicado que un RCR, MD5, Hash, etc.

Saludos,

[mamcx]

Pues a menos que quieras una equivalencia EXACTA ninguno de los metodos anteriores te va a servir.

Sin embargo, quieres buscar el contenido BINARIO o quieres simplemente buscar informacion de la imagen? Porque en lo segundo es muy simple: nombre, fecha, atributos, etc.. son cadenas de texto.

Existen algoritmos especiales para buscar imagenes pero ya son otro cuento.

[[enecumene]]

Vaya, veo que si estas inspirado hoy, una pregunta, si se calcula la de una imagen varias veces se genera una misma clave?

Saludos.

[mamcx]

Una variacion de un bit alterara la clave. Solo serviria para una coincidencia exacta.

[[enecumene]]

Empezado por mamcx

Una variacion de un bit alterara la clave. Solo serviria para una coincidencia exacta.

Gracias mamcx, entonces como hago la comparación exacta de una imagen, o sea como consigo el valor binario de esa imagen?

SAludos.

[[Delphius]]

Empezado por mamcx

Pues a menos que quieras una equivalencia EXACTA ninguno de los metodos anteriores te va a servir.

Sin embargo, quieres buscar el contenido BINARIO o quieres simplemente buscar informacion de la imagen? Porque en lo segundo es muy simple: nombre, fecha, atributos, etc.. son cadenas de texto.

Existen algoritmos especiales para buscar imagenes pero ya son otro cuento.

¿A que te refieres con que no va a servir?

Haz dicho algo clave, tal vez con sólo fijarse en los atributos basta. Pero si es que realmente se desea tener un identificador único para cada imagen, hay que tener un buen algoritmo. Porque los atributos podrían cambiarse, mientras que la imagen puede ser la misma (o bastante similar)

Empezado por enecumene

Vaya, veo que si estas inspirado hoy, una pregunta, si se calcula la de una imagen varias veces se genera una misma clave?

Saludos.

El algoritmo está pensado para devolver siempre la misma clave si es que se suministra la misma imgen. No posee aleatoriedad. El valor de la clave depende del contenido de la imagen, por lo que si se pasa A, se obtendrá siempre la clave A.

Como dije, necesitaría análisis, pues por más que otra imagen sea distinta no se garantiza que se obtendrá un valor distinto. Es por ello que para impedir ciertas similitudes, pondero las sumas. Pero no esto no es suficiente. Por ejemplo, si la suma da 300 y la ponderación es 60, es lo mismo que si la suma es 60 y la ponderación sea 300. ¿Se entiende?

No es un algoritmo demasiado fuerte. Pero puede que sea de utilidad para comenzar.

Saludos,

[[enecumene]]

Vale, se entiende perfectamente, solo me queda sacar un tiempo para ver si lo puedo aplicar en el proyecto. De nuevo gracias amigo Delphius.

Saludos

[mamcx]

Si estas buscando una coincidencia exacta, metele un hash MD5 o un SHA.

Si quieres una excelente libreria de todo estos temas:

http://sourceforge.net/projects/openstrsecii/

Es la version open source de http://www.streamsec.com/products_strsectools.asp y me consta que el autor es un genio de estos temas.