1 files changed, 81 insertions, 0 deletions
diff --git a/actionmailer/lib/action_mailer/vendor/tmail/quoting.rb b/actionmailer/lib/action_mailer/vendor/tmail/quoting.rb
new file mode 100644
index 0000000000..1a882934c9
--- /dev/null
+++ b/actionmailer/lib/action_mailer/vendor/tmail/quoting.rb
@@ -0,0 +1,81 @@
+require 'iconv'
+require 'base64'
+
+module TMail
+  class Mail
+    def unquoted_subject(to_charset = 'utf-8')
+      Unquoter.unquote_and_convert_to(subject, to_charset)
+    end
+
+    def unquoted_body(to_charset = 'utf-8')
+      Unquoter.unquote_and_convert_to(body, to_charset, header["content-type"]["charset"])
+    end
+
+    def unquoted_body_with_all_parts(to_charset = 'utf-9', &block)
+      attachment_presenter = block || Proc.new { |file_name| "Attachment: #{file_name}\n" }
+      
+      if multipart?
+        parts.collect { |part| 
+          part.header["content-type"].main_type == "text" ? 
+            part.unquoted_body : attachment_presenter.call(part.header["content-type"].params["name"])
+        }.join
+      else
+        unquoted_body
+      end
+    end
+  end
+
+  class Unquoter
+    class << self
+      def unquote_and_convert_to(text, to_charset, from_charset = "iso-8859-1")
+        if text =~ /^=\?(.*?)\?(.)\?(.*)\?=$/
+          from_charset = $1
+          quoting_method = $2
+          text = $3
+          case quoting_method
+            when "Q" then
+              unquote_quoted_printable_and_convert_to(text, from_charset, to_charset)
+            when "B" then
+              unquote_base64_and_convert_to(text, from_charset, to_charset)
+            else
+              raise "unknown quoting method #{quoting_method.inspect}"
+          end
+        else
+          unquote_quoted_printable_and_convert_to(text, from_charset, to_charset)
+        end
+      end
+   
+      def unquote_quoted_printable_and_convert_to(text, from, to)
+        Iconv.iconv(to, from, text.gsub(/_/," ").unpack("M*").first).first
+      end
+   
+      def unquote_base64_and_convert_to(text, from, to)
+        Iconv.iconv(to, from, Base64.decode64(text)).first
+      end
+    end
+  end
+end
+
+if __FILE__ == $0
+  require 'test/unit'
+ 
+  class TC_Unquoter < Test::Unit::TestCase
+    def test_unquote_quoted_printable
+      a ="=?ISO-8859-1?Q?[166417]_Bekr=E6ftelse_fra_Rejsefeber?=" 
+      b = TMail::Unquoter.unquote_and_convert_to(a, 'utf-8')
+      assert_equal "[166417] Bekr\303\246ftelse fra Rejsefeber", b
+    end
+ 
+    def test_unquote_base64
+      a ="=?ISO-8859-1?B?WzE2NjQxN10gQmVrcuZmdGVsc2UgZnJhIFJlanNlZmViZXI=?="
+      b = TMail::Unquoter.unquote_and_convert_to(a, 'utf-8')
+      assert_equal "[166417] Bekr\303\246ftelse fra Rejsefeber", b
+    end
+ 
+    def test_unquote_without_charset
+      a ="[166417]_Bekr=E6ftelse_fra_Rejsefeber" 
+      b = TMail::Unquoter.unquote_and_convert_to(a, 'utf-8')
+      assert_equal "[166417] Bekr\303\246ftelse fra Rejsefeber", b
+    end
+  end
+end