[Mew-dist 16672] Re: PGP, S/MIMEがSolaris 7/8のxemacsでは暗号化/署名が出来ない。

Ryutaroh Matsumoto ryutaroh at example.com
2001年 2月 28日 (水) 19:39:00 JST


まつもとです。見当はつきました。

From: SUGIMORI (杉森 隆行) <taro at example.com>
Subject: [Mew-dist 16670] Re: PGP, S/MIMEがSolaris 7/8のxemacsでは暗号化/署名が出来ない。
>       3. openssl smime -decrypt .... -in smime.p7m -out smime.txt
> 	 → Content-Type: application/x-pkcs7-mime; name="smime.p7m"
> 	    Content-Transfer-Encoding: base64
> 	 のファイルができた。

content-typeが application/x-pkcs7-mime のときにはパラメーター
smime-typeでそれが署名か暗号化なのかわかるようにすることをRFCは推奨
(SHOULD)していますが、杉森さんが受け取ったメールはそれをまったく無視し
ているようです。

mew-smime.elでsmime-typeをまったく無視するようにプログラムを変えるパッ
チを作ったので試してみていただけませんか?

mew-1.95b109にたいするパッチで、diffを小さくして何を変更したのかわかり
やすくするため、敢えてインデントの付け直しなどはしてません。

パッチでやっていることはまずx-pkcs7-mimeが署名だと決め打ちで署名の検証
をしようとして、opensslのexit値が非0だったら暗号だと思って解読しようと
するという荒っぽいことです。

--
松本  隆太郎
-------------- next part --------------
--- mew-1.95b109/mew-smime.el.~1~	Wed Feb 21 17:07:13 2001
+++ mew-1.95b109/mew-smime.el	Wed Feb 28 19:20:54 2001
@@ -168,11 +168,7 @@
        (write-region (mew-syntax-get-begin syntax)
 		     (point-max)
 		     encrypted-file nil 'no-msg))
-      (if (and (mew-syntax-get-param ctl "smime-type")
-	       (string-match "signed-data"
-			     (mew-syntax-get-param ctl "smime-type")))
 	  ;; signature verification
-	  (progn
 	    (message "S/MIME verifying ... ")
 	    (if (equal 0 (mew-call-process-lang
 			  "openssl" nil nil nil
@@ -182,8 +178,6 @@
 			  "-signer" pubkey-file "-out" decrypted-file))
 		(setq result (concat "valid S/MIME digital signatuer signed by " 
 				     (mew-smime-move-pubkey-and-extract-email pubkey-file)))
-	      (setq mew-decode-not-decrypted t))
-	    (message "S/MIME verifying ... done"))
 	;; decryption
 	(message "S/MIME decrypting ...")
 	(setq mew-smime-running 'decrypt)
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: 無し
型:         application/x-pkcs7-signature
サイズ:     3207 バイト
説明:       attachment; filename="smime.p7s"
URL:        <http://www.mew.org/pipermail/mew-dist/attachments/20010228/b2a512b7/attachment.bin>


Mew-dist メーリングリストの案内