Tripletail::SMIME - S/MIMEの署名、検証、暗号化、復号化
use Tripletail::SMIME; my $plain = <<'EOF'; From: alice@example.org To: bob@example.com Subject: Tripletail::SMIME test This is a test mail. Please ignore... EOF my $smime = Tripletail::SMIME->new(); $smime->setPrivateKey($privkey, $crt); # $smime->setPublicKey([$icacert]); # if needed. my $signed = $smime->sign($plain); print $signed;
S/MIMEの署名、検証、暗号化、復号化を行うクラス。
cryptoライブラリ(http://www.openssl.org)が必要。
引数無し
$smime->setPrivateKey($key, $crt); $smime->setPrivateKey($key, $crt, $password);
秘密鍵を設定する。ここで設定された秘密鍵は署名と復号化の際に用いられる。 ファイル名ではなく、鍵本体を渡す。
対応しているフォーマットは PEM のみ。鍵の読み込みに失敗した場合はdieする。
$smime->setPublicKey($crt); $smime->setPublicKey([$crt1, $crt2, ...]);
公開鍵を設定する。ここで設定された公開鍵は署名への添付、署名の検証、 そして暗号化の際に用いられる。
$signed_mime = $smime->sign($raw_mime);
署名を行い、MIMEメッセージを返す。可能な署名はクリア署名のみ。
Content-*, MIME-* 及び Subject を除いたヘッダは multipartのトップレベルにコピーされる。 Subject はS/MIMEを認識できないメーラのために, multipartの トップレベルと保護されるメッセージの両側に配置される。
Content-*
MIME-*
Subject
$sign = $smime->signonly($prepared_mime);
署名の計算を行う。 $sign はBASE64でエンコードされて返る。 $prepared_mime には, "prepareSmimeMessage" で返される値を渡す。
$sign
$prepared_mime
($prepared_mime,$outer_header) = $smime->prepareSmimeMessage($source_mime);
署名用のメッセージを準備する。 $mime には著名用に修正されたMIMEメッセージを返す。 $header は、S/MIMEの外側に付与するヘッダを返す。
$mime
$header
$prepared_mime の本文は$source_mimeと同じ物となるが、 ヘッダに関してはContent-*, MIME-*, Subject を除く全てが 取り除かれる。取り除かれたヘッダは $outer_header に返される。 S/MIMEメッセージを構築する際にはこれをS/MIMEメッセージのヘッダに追加する。 Subject ヘッダのみは $prepared_mime と $outer_header の両方に 現れる点に注意。
$source_mime
$outer_header
$source_mime = $smime->check($signed_mime);
検証を行う。検証に失敗した場合はその理由と共にdieする。
$encrypted_mime = $smime->encrypt($raw_mime);
暗号化を行う。
$decrypted_mime = $smime->decrypt($encrypted_mime);
復号化を行う。復号化に失敗した場合はその理由と共にdieする。
$is_signed = $smime->isSigned($mime);
渡されたMIMEメッセージがS/MIMEで署名されたものなら真を返す。 クリア署名かどうかは問わない。 署名後に暗号化したメッセージを渡した場合は、署名が直接見えない為、 偽を返す事に注意。
$is_encrypted = $smime->isEncrypted($mime);
渡されたMIMEメッセージがS/MIMEで暗号化されたものなら真を返す。 暗号化後に署名したメッセージを渡した場合は、暗号文が直接見えない為、 偽を返す事に注意。
To install Tripletail, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Tripletail
CPAN shell
perl -MCPAN -e shell install Tripletail
For more information on module installation, please visit the detailed CPAN module installation guide.