• Publicidad

Usar OppenSSL desde Perl

Así que programas sin strict y las expresiones regulares son otro modo de hablar. Aquí encontrarás respuestas de nivel avanzado, no recomendable para los débiles de corazón.

Re: Usar OppenSSL desde Perl

Notapor Lor » 2011-05-12 06:07 @296

El error lo cometí yo aquí al transcribir. Pero en el código original los nombres coinciden.

Mi problema estaría ahora en que quiero codificar en base 64 el archivo cms.bin obtenido en el firmado con el openSSL.

¿¿ Está bien hacerlo como sigue ??
open my $CMS, q[<], 'cms.bin';
binmode $CMS;
read $CMS, my $cms, -s 'cms.bin';
close $CMS;

use MIME::Base64;

my $encoded = encode_base64($cms); # ¿¿ Es correcto ??
Lor
Perlero nuevo
Perlero nuevo
 
Mensajes: 187
Registrado: 2005-04-28 05:47 @282

Publicidad

Re: Usar OppenSSL desde Perl

Notapor explorer » 2011-05-12 10:34 @482

Sí, yo sí lo veo correcto... $encoded debería ser un fichero de texto con líneas de 76 caracteres de ancho, separadas por "\n".
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Usar OppenSSL desde Perl

Notapor Lor » 2011-05-14 16:25 @725

Perfecto, ¡¡¡primera parte LOGRADA!!! ¡¡¡Gracias a su ayuda y colaboración permanente!!!

El error estaba en la llamada al OpenSSL:
open(my $fh, "| openssl smime -sign -signer $cert -inkey $privatekey -outform DER -out cms.bin -nodetach");
binmode $fh;
print $fh $tra_xml;
close $fh;

$cert y $privatekey deben ser los path a los archivos que contienen la clave privada y el certificado correspondiente.

¡¡¡¡ Modificando eso anda perfecto !!!! ¡¡¡¡GRACIAS!!!!

¡¡¡Ahora vamos con la segunda parte!!! ¡¡¡Pero en otro post!!! :D :D
Última edición por explorer el 2011-05-14 18:25 @809, editado 1 vez en total
Razón: Ortografía: admiraciones
Lor
Perlero nuevo
Perlero nuevo
 
Mensajes: 187
Registrado: 2005-04-28 05:47 @282

Anterior

Volver a Avanzado

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 52 invitados

cron