Re: emacs: error decrypting s/mime

[Alexander Adolf <alexander.adolf@condition-alpha.com>]

Hello David,

David Bremner <david@tethera.net> writes:

> David Bremner <david@tethera.net> writes:
>
>> It's not perfect (the encryption status for S/MIME needs some new UI
>> code on the emacs end), but it's better than the status quo, as far as I
>> can tell.
>
> I think this might be a deeper issue. Looking at the structure of
>
>   test/corpora/protected-headers/smime-sign+enc.eml
>
> it looks like there is an application/pkcs-7 part for the outer
> container with an encstatus, and one inside that (with the same mime
> type) with a sigstatus. So maybe the right thing is to just ignore
> missing encstatus?
> [...]

After decrypting (i.e. when you see the encstatus), and the decryption
was successful (encstatus is not "bad"), the application/pkcs7-mime part
has been expanded into a multipart/signed part. This, in turn, then
needs to be rendered.

In short, the below snippet fixes the issue for me. It could for example
be added to notmuch-show.el.

---------------------------- Begin Quote -----------------------------

(defun notmuch-show-insert-part-application/pkcs7-mime (msg part content-type nth depth button)
  (let* ((encstatus-plist (car (plist-get part :encstatus)))
	 (encstatus (plist-get encstatus-plist :status)))
      (notmuch-crypto-insert-encstatus-button encstatus-plist)
      (if (not (string= encstatus "bad"))
	  (notmuch-show-insert-part-multipart/signed msg
						     (car (plist-get part :content))
						     content-type
						     nth
						     depth
						     button))))

(fset 'notmuch-show-insert-part-application/x-pkcs7-mime
  'notmuch-show-insert-part-application/pkcs7-mime)

----------------------------- End Quote ------------------------------


Hoping to have helped,

  --alexander