20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
# File 'ext/cobreak/cobreak_gcrypt.c', line 20
VALUE tiger160_hexdigest(VALUE self, VALUE full) {
char *str = RSTRING_PTR(full);
int length = RSTRING_LEN(full); // Obtener la longitud de la cadena
gcry_md_hd_t handle;
unsigned char digest[20]; // Tiger-160 produce un hash de 20 bytes
char out[41]; // 20 bytes * 2 para hexadecimal + 1 para el terminador
// Inicializar la biblioteca libgcrypt
if (!gcry_check_version(GCRYPT_VERSION)) {
rb_raise(rb_eRuntimeError, "Versión de libgcrypt no compatible.");
}
// Abrir el contexto de hash para Tiger-160
gcry_md_open(&handle, GCRY_MD_TIGER, 0);
// Actualizar el hash con la cadena de entrada
gcry_md_write(handle, str, length);
// Finalizar el hash y obtener el resultado
memcpy(digest, gcry_md_read(handle, GCRY_MD_TIGER), 20);
gcry_md_close(handle);
// Convertir el hash a una cadena hexadecimal
for (int n = 0; n < 20; ++n) {
sprintf(&(out[n * 2]), "%02x", (unsigned int)digest[n]);
}
out[40] = '\0'; // Terminar la cadena
VALUE result = rb_str_new2(out); // Crear una nueva cadena Ruby
return result;
}
|