Foro - Perl en Español

Hola a todos.

¿Alguien sabe cómo calcular un hash (sha-1) de un fichero? Por ejemplo, de un ejecutable del sistema (.exe).

Muchas gracias.

Un saludo,
Ricar.

Con el módulo Digest::SHA1 lo resuelves fácilmente.

Aquí un ejemplo, verificado por el propio comando sha1sum del sistema:


Hay otros módulos que permiten calcular otros SHA (SHA-1, SHA-224, SHA-256, SHA-384, y SHA-512), como el Digest::SHA.

Hola explorer.

Gracias por tu respuesta. El problema es que cuando comprueba el hash resultante me sale distinto que los valores dados por otros programa (Hash Calculator y HashTab -para Windows-).

No sé porqué no me da el mismo valor.

Saludos,
Ricar.

No conozco esos programas, así que no puedo ayudarte mucho, salvo que, de alguna manera, tengas la seguridad de que los ficheros han sido leídos correctamente.

Por ejemplo, suele ser normal, a la hora de leer un fichero, olvidarnos que tenemos que hacerlo en binario, porque sino, los gestores de archivo de los lenguajes de ordenador traducirán de forma distinta los caracteres de final de línea (y otras conversiones más). Para eso hay que llevar un control de la longitud de lo leído.

No has publicado código, así que no puedo decirte si hay algo raro en él. Pero el ejemplo que te he mostrado, funciona muy bien.

¿Seguro que esos programas calculan el SHA1? ¿No será otro algoritmo de Has?

Hola explorer.

Calculan sha1 entre otros.

El programa es sencillito


Usando los otros programas coinciden en el resultado que, por desgracia, es diferente en mi programita de prueba.

Saludos,
Ricar.

Ok, solucionado con binmode, como bien apuntabas.

Muchas gracias.

Un saludo,
Ricar.

Claro, en mi ejemplo funciona sin binmode() porque yo uso un sistema operativo de verdad.

Muchas veces se me olvida que yo soy un afortunado por usar Linux, mientras que los demás se tropiezan con estas tonterías, en Windows.

Los finales de línea no son transformados porque no hace falta hacerlo.

Además, ahora que lo repaso, sí que lo pone en el manual de Digest:SHA1, en la función addfile(): hay que asegurarse, en la mayoría de las ocasiones, que el fichero esté puesto en modo binario.

Bueno, en este caso creo que el problema es más el programador que el sistema operativo .

Saludos y gracias,
Ricar.