173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
|
# File 'ext/cobreak/cobreak_openssl.c', line 173
VALUE sha2_384_hexdigest(VALUE self, VALUE input) {
// Convertir el valor Ruby a una cadena C
char *str = RSTRING_PTR(input);
int length = RSTRING_LEN(input); // Obtener la longitud de la cadena
unsigned char digest[SHA384_DIGEST_LENGTH]; // SHA-384 produce un hash de 48 bytes
char out[97]; // 48 bytes * 2 para hexadecimal + 1 para el terminador
// Calcular el hash SHA-384
SHA384((unsigned char*)str, length, digest);
// Convertir el hash a una cadena hexadecimal
for (int n = 0; n < SHA384_DIGEST_LENGTH; ++n) {
sprintf(&(out[n * 2]), "%02x", (unsigned int)digest[n]);
}
out[96] = '\0'; // Terminar la cadena
VALUE result = rb_str_new2(out); // Crear una nueva cadena Ruby
return result;
}
|