replyr 0.0.7 → 0.0.8

data/test/replyr/bounce_address_test.rb

@@ -0,0 +1,91 @@
+require_relative '../test_helper'
+
+setup_database
+
+describe Replyr::BounceAddress do
+  describe '#new' do
+    it 'returns new address' do
+      @user = User.create
+
+      address = Replyr::BounceAddress.new(@user)
+      assert_kind_of Replyr::BounceAddress, address
+      assert_equal @user, address.model
+    end
+
+  end
+
+  describe '#new_from_address' do
+    it 'returns new instance if address is valid' do
+      user = User.create
+      correct_address = Replyr::BounceAddress.new(user).address
+      address = Replyr::BounceAddress.new_from_address(correct_address)
+      assert_kind_of Replyr::BounceAddress, address
+      assert_equal user.id, address.model.id
+      assert_equal user.class.name, address.model.class.name
+    end
+    
+    it 'return nil if email address is malformed (no reply email)' do
+      assert_equal nil, Replyr::BounceAddress.new_from_address("malformed@example.com")
+    end
+    
+    it 'returns nil if addreess is invalid' do
+      assert_equal nil, Replyr::BounceAddress.new_from_address("reply-comment-1-1-wrongtoken@example.com")
+    end
+  end
+  
+  describe '#token_valid?' do
+    before do
+      @address = Replyr::BounceAddress.new(User.create)
+    end
+
+    it 'return true if the passed token is valid' do
+      assert_equal true, @address.token_valid?(@address.token)
+    end
+
+    it 'return false if the passed token is valid' do
+      assert_equal false, @address.token_valid?("wrong_token")
+    end
+  end
+
+  describe '#ensure_valid_token!' do
+    before do
+      @address = Replyr::BounceAddress.new(User.create)
+    end
+
+    it 'throws exception if token is invalid' do
+      assert_raises RuntimeError do
+        @address.ensure_valid_token!("wrong_token")
+      end
+    end
+
+    it 'throws exception if token is invalid' do
+      assert_equal nil, @address.ensure_valid_token!(@address.token)
+    end
+  end
+  
+  describe '#token' do
+    before do
+      @user1 = User.create
+      @user2 = User.create
+    end
+    
+    it 'returns an auth token' do
+      address = Replyr::BounceAddress.new(@user1)
+      assert_kind_of String, address.token
+    end
+    
+    it 'return the same auth token for same arguments' do
+      address1 = Replyr::BounceAddress.new(@user2)
+      address2 = Replyr::BounceAddress.new(@user2)
+      assert_equal address1.token, address2.token
+    end
+
+    it 'return a different auth token for different user' do
+      address1 = Replyr::BounceAddress.new(@user1)
+      address2 = Replyr::BounceAddress.new(@user2)
+      refute_equal address1.token, address2.token
+    end
+    
+  end
+
+end

data/test/replyr/email_test.rb

@@ -0,0 +1,93 @@
+# -*- encoding : utf-8 -*-
+require_relative '../test_helper'
+require 'mail'
+
+describe Replyr::Email do
+  describe "#new" do
+    it 'parses plain message object correctly' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/reply_plain.eml'))
+      assert_equal "wursttheke@me.com", email.from
+      assert_equal "Das ist wunderschön", email.stripped_body
+    end
+
+    it 'parses multipart message object correctly' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/reply_multipart.eml'))
+      assert_equal "wursttheke@me.com", email.from
+      assert_equal "Das ist wunderschön", email.stripped_body
+    end
+
+    it 'removes signature from message object' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/reply_plain_signature.eml'))
+      assert_equal "wursttheke@me.com", email.from
+      assert_equal "Das ist wunderschön", email.stripped_body
+    end
+
+  end  
+  
+  describe '#is_bounce_email?' do
+    it 'returns true for a bounce mail (failed)' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/bounce_530.eml'))
+      assert_equal true, email.is_bounce_email?
+    end
+    
+    it 'returns false for a bounce mail (temporary failure)' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/bounce_422.eml'))
+      assert_equal false, email.is_bounce_email?
+    end
+      
+    it 'returns false for a normal mail' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/reply_plain.eml'))
+      assert_equal false, email.is_bounce_email?
+    end
+  end
+
+  describe '#failed_permanently?' do
+    it 'returns true for a bounce mail of type 5.x.x' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/bounce_530.eml'))
+      assert_equal true, email.failed_permanently?
+    end
+    
+    it 'returns true for a bounce mail of type 4.x.x' do
+      email = Replyr::Email.new(Mail.read('test/replyr/emails/bounce_422.eml'))
+      assert_equal false, email.failed_permanently?
+    end
+  end
+  
+  describe '#process' do
+    it 'returns false if mail is invalid' do
+      mail = Mail.read('test/replyr/emails/reply_plain.eml')
+      email = Replyr::Email.new(mail)
+      assert_equal false, email.process
+    end
+    
+    it "processes reply mail if it's valid and return true" do
+      address = Replyr::ReplyAddress.new(Comment.create, User.create).address
+      mail = Mail.read('test/replyr/emails/reply_plain.eml')
+      mail.to = address # set correct address
+      email = Replyr::Email.new(mail)
+
+      assert true, email.is_reply_email?
+
+      comment_count = Comment.count
+      assert_equal true, email.process
+      assert_equal comment_count + 1, Comment.count
+    end
+
+    it "processes bounce mail if it's valid and return true" do
+      user = User.create(email: "test@example.com")
+      address = Replyr::BounceAddress.new(user).address
+      mail = Mail.read('test/replyr/emails/bounce_530.eml')
+      mail.to = address # set correct address
+      email = Replyr::Email.new(mail)
+
+      assert_equal true, email.is_bounce_email?
+      assert_equal false, user.email_invalid?
+      assert_equal true, email.process
+      assert_equal true, user.reload.email_invalid?
+    end
+
+
+  end
+  
+
+end

data/test/replyr/emails/bounce_422.eml

@@ -0,0 +1,98 @@
+Return-Path: <mail_dump@ns1.sssssss.net.au>
+Received: from acomputer ([unix socket])
+	 by imap01.sssssss.net (Cyrus) with LMTPA;
+	 Wed, 16 Jan 2008 13:51:42 -0800
+X-Sieve: CMU Sieve 2.2
+Received: from smtp.sssssss.org (unknown [198.0.0.92])
+	by imap01.sssssss.net (Postfix) with ESMTP id BFE6477FAE
+	for <aaaa@sssssss.net>; Wed, 16 Jan 2008 13:51:40 -0800 (PST)
+Received: from ns1.sssssss.net.au (ns1.sssssss.net.au [202.0.0.246])
+	by smtp.sssssss.org (Postfix) with ESMTP id 96E5C6C6830
+	for <aaaa@sssssss.net>; Wed, 16 Jan 2008 11:08:14 -0800 (PST)
+Received: from ns1.sssssss.net.au (unknown [127.0.0.1])
+	by ns1.sssssss.net.au (Postfix) with ESMTP id E1BCEF227
+	for <aaaa@sssssss.net>; Thu, 17 Jan 2008 03:40:53 +1100 (EST)
+Received: from ns1.sssssss.net.au (ns1.sssssss.net.au [202.0.0.246])
+        by localhost (FormatMessage) with SMTP id ceaa681bbcb6c7f6
+        for <jennifer@sss.sssssss.net.au>; Thu, 17 Jan 2008 03:40:53 +1100 (EST)
+Received: from mail11.tppppp.com.au (unknown [203.0.0.161])
+	by ns1.sssssss.net.au (Postfix) with ESMTP id 7F2D2F225
+	for <jennifer@sss.sssssss.net.au>; Thu, 17 Jan 2008 03:40:52 +1100 (EST)
+Received: from localhost (localhost)
+	by mail11.tppppp.com.au (envelope-from MAILER-DAEMON) (8.14.2/8.14.2) id m0GFZ1c3009410;
+	Thu, 17 Jan 2008 03:40:52 +1100
+Date: Thu, 17 Jan 2008 03:40:52 +1100
+From: Mail Delivery Subsystem <MAILER-DAEMON@tppppp.com.au>
+Message-Id: <200801161640.m0GFZ1c3009410@mail11.ttttt.com.au>
+To: <jennifer@sss.sssssss.net.au>
+MIME-Version: 1.0
+Content-Type: multipart/report; report-type=delivery-status;
+	boundary="m0GFZ1c3009410.1200501652/mail11.ttttt.com.au"
+Subject: Warning: could not send message for past 8 hours
+Auto-Submitted: auto-generated (warning-timeout)
+Resent-Date: Thu, 17 Jan 2008 03:40:53 +1100 (EST)
+Resent-From: <mail_dump@ns1.sssssss.net.au>
+Resent-To: <mikel@sssssss.net>
+Resent-Message-ID: <ceaa681bbcb6c7f6.1200501653@sssssss.net.au>
+X-Spam-Status: No
+
+
+--m0GFZ1c3009410.1200501652/mail11.ttttt.com.au
+Content-Type: text/plain
+
+    **********************************************
+    **      THIS IS A WARNING MESSAGE ONLY      **
+    **  YOU DO NOT NEED TO RESEND YOUR MESSAGE  **
+    **********************************************
+
+The original message was received at Wed, 16 Jan 2008 19:38:07 +1100
+from 60-0-0-61.static.tppppp.com.au [60.0.0.61]
+
+This message was generated by mail11.tppppp.com.au
+
+   ----- Transcript of session follows -----
+.... while talking to mail.oooooooo.com.au.:
+>>> DATA
+<<< 452 4.2.2 <fraser@oooooooo.com.au>... Mailbox full
+<fraser@oooooooo.com.au>... Deferred: 452 4.2.2 <fraser@oooooooo.com.au>... Mailbox full
+<<< 503 5.0.0 Need RCPT (recipient)
+Warning: message still undelivered after 8 hours
+Will keep trying until message is 5 days old
+
+-- 
+This message has been scanned for viruses and
+dangerous content by MailScanner, and is
+believed to be clean.
+
+
+--m0GFZ1c3009410.1200501652/mail11.ttttt.com.au
+Content-Type: message/delivery-status
+
+Reporting-MTA: dns; mail11.ttttt.com.au
+Arrival-Date: Wed, 16 Jan 2008 19:38:07 +1100
+
+Final-Recipient: RFC822; fraser@oooooooo.com.au
+Action: delayed
+Status: 4.2.2
+Remote-MTA: DNS; mail.oooooooo.com.au
+Diagnostic-Code: SMTP; 452 4.2.2 <fraser@oooooooo.com.au>... Mailbox full
+Last-Attempt-Date: Thu, 17 Jan 2008 03:40:52 +1100
+
+--m0GFZ1c3009410.1200501652/mail11.ttttt.com.au
+Content-Type: text/rfc822-headers
+
+Return-Path: <jennifer@sss.sssssss.net.au>
+Received: from k1s2yo86 (60-0-0-61.static.tppppp.com.au [60.0.0.61])
+	by mail11.tppppp.com.au (envelope-from jennifer@sss.sssssss.net.au) (8.14.2/8.14.2) with ESMTP id m0G8c0fR020461
+	for <fraser@oooooooo.com.au>; Wed, 16 Jan 2008 19:38:07 +1100
+Date: Wed, 16 Jan 2008 19:38:07 +1100
+From: Sydney <jennifer@sss.sssssss.net.au>
+Message-ID: <15655788.13.1200472642578.JavaMail.Administrator@mail.ttttt.com.au>
+Subject: Wanted
+MIME-Version: 1.0
+Content-Type: multipart/mixed; 
+	boundary="----=_Part_12_28168925.1200472642578"
+X-Virus-Scanned: ClamAV 0.91.2/5484/Wed Jan 16 06:31:27 2008 on mail11.tppppp.com.au
+X-Virus-Status: Clean
+
+--m0GFZ1c3009410.1200501652/mail11.ttttt.com.au--

data/test/replyr/emails/bounce_530.eml

@@ -0,0 +1,96 @@
+Return-Path: <MAILER-DAEMON@imap01.sssss.net>
+Received: from acomputer ([unix socket])
+	 by imap01.sssss.net (Cyrus) with LMTPA;
+	 Sun, 23 Dec 2007 15:04:04 -0800
+X-Sieve: CMU Sieve 2.2
+Received: from smtp.sssss.org (unknown [198.0.0.92])
+	by imap01.sssss.net (Postfix) with ESMTP id E434877FB0
+	for <mikel@sssss.net>; Sun, 23 Dec 2007 15:04:03 -0800 (PST)
+Received: from mail12.tttttt.com.au (mail12.tttttt.com.au [203.0.0.162])
+	by smtp.sssss.org (Postfix) with ESMTP id 53313B42B7
+	for <mikel@sssss.net>; Sun, 23 Dec 2007 15:03:54 -0800 (PST)
+Received: from localhost (localhost)
+	by mail12.tttttt.com.au (envelope-from MAILER-DAEMON) (8.14.2/8.14.2) id lBNN3rDp003436;
+	Mon, 24 Dec 2007 10:03:53 +1100
+Date: Mon, 24 Dec 2007 10:03:53 +1100
+From: Mail Delivery Subsystem <MAILER-DAEMON@tttttt.com.au>
+Message-Id: <200712232303.lBNN3rDp003436@mail12.rrrr.com.au>
+To: <mikel@sssss.net>
+MIME-Version: 1.0
+Content-Type: multipart/report; report-type=delivery-status;
+	boundary="lBNN3rDp003436.1198451033/mail12.rrrr.com.au"
+Subject: Returned mail: see transcript for details
+Auto-Submitted: auto-generated (failure)
+X-Spam-Status: No
+
+This is a MIME-encapsulated message
+
+--lBNN3rDp003436.1198451033/mail12.rrrr.com.au
+
+The original message was received at Mon, 24 Dec 2007 10:03:47 +1100
+from 60-0-0-146.static.tttttt.com.au [60.0.0.146]
+
+This message was generated by mail12.tttttt.com.au
+
+   ----- The following addresses had permanent fatal errors -----
+<edwin@zzzzzzz.com>
+    (reason: 553 5.3.0 <edwin@zzzzzzz.com>... Unknown E-Mail Address)
+
+   ----- Transcript of session follows -----
+... while talking to mail.zzzzzz.com.:
+>>> DATA
+<<< 553 5.3.0 <edwin@zzzzzzz.com>... Unknown E-Mail Address
+550 5.1.1 <edwin@zzzzzzz.com>... User unknown
+<<< 503 5.0.0 Need RCPT (recipient)
+
+-- 
+This message has been scanned for viruses and
+dangerous content by MailScanner, and is
+believed to be clean.
+
+
+--lBNN3rDp003436.1198451033/mail12.rrrr.com.au
+Content-Type: message/delivery-status
+
+Reporting-MTA: dns; mail12.rrrr.com.au
+Received-From-MTA: DNS; 60-0-0-146.static.tttttt.com.au
+Arrival-Date: Mon, 24 Dec 2007 10:03:47 +1100
+
+Final-Recipient: RFC822; edwin@zzzzzzz.com
+Action: failed
+Status: 5.3.0
+Remote-MTA: DNS; mail.zzzzzz.com
+Diagnostic-Code: SMTP; 553 5.3.0 <edwin@zzzzzzz.com>... Unknown E-Mail Address
+Last-Attempt-Date: Mon, 24 Dec 2007 10:03:53 +1100
+
+--lBNN3rDp003436.1198451033/mail12.rrrr.com.au
+Content-Type: text/rfc822-headers
+
+Return-Path: <mikel@sssss.net>
+Received: from [192.168.0.3] (60-0-0-146.static.tttttt.com.au [60.0.0.146])
+	by mail12.tttttt.com.au (envelope-from mikel@sssss.net) (8.14.2/8.14.2) with ESMTP id lBNN3jDq002941
+	for <edwin@zzzzzzz.com>; Mon, 24 Dec 2007 10:03:47 +1100
+Resent-Date: Mon, 24 Dec 2007 10:03:47 +1100
+Date: Mon, 24 Dec 2007 10:03:47 +1100
+Resent-Message-Id: <200712232303.lBNN3jDq002941@mail12.rrrr.com.au>
+Message-Id: <200712232303.lBNN3jDq002941@mail12.rrrr.com.au>
+Mime-Version: 1.0
+Content-Type: multipart/report;
+	report-type=delivery-status;
+	boundary=80874BE0-2DFF-4BCB-8AA1-A00E17ACA2EA
+Received: from murder ([unix socket]) by imap01.sssss.net (Cyrus v2.2.12-Invoca-RPM-2.2.12-6.fc4) with LMTPA; Sun, 23 Dec 2007 12:59:14 -0800
+Received: from smtp.sssss.org (unknown [198.0.0.92]) by imap01.sssss.net (Postfix) with ESMTP id 0AC9F77EDD for <mikel@sssss.net>; Sun, 23 Dec 2007 12:59:14 -0800 (PST)
+Received: from ns1.sssss.net.au (ns1.sssss.net.au [202.0.0.246]) by smtp.sssss.org (Postfix) with ESMTP id 6FC83B42B4 for <mikel@sssss.net>; Sun, 23 Dec 2007 12:59:09 -0800 (PST)
+Received: from unicom (unknown [85.0.0.121]) by ns1.sssss.net.au (Postfix) with ESMTP id 85ED5F1F7 for <webmaster@dianetics.org.au>; Mon, 24 Dec 2007 07:59:02 +1100 (EST)
+Received: from [85.0.0.121] by mail.zzzzzz.com; , 23 Dec 2007 12:57:34 -0800
+X-Mailer: Apple Mail (2.753)
+From: postoffice
+Subject: Returned mail: User unknown
+Resent-From: mikel@sssss.net
+Auto-Submitted: auto-generated (failure)
+To: "Merrill" <edwin@zzzzzzz.com>
+X-Virus-Scanned: ClamAV 0.91.2/5229/Mon Dec 24 07:36:55 2007 on mail12.tttttt.com.au
+X-Virus-Status: Clean
+
+--lBNN3rDp003436.1198451033/mail12.rrrr.com.au--
+

data/test/replyr/handle_bounce_test.rb

@@ -0,0 +1,33 @@
+require_relative '../test_helper'
+
+setup_database
+
+describe Replyr::HandleBounce do
+  describe '#bounce_address_object' do
+    it 'returns bounce return_path address object' do
+      @user = User.create
+      address = @user.bounce_address_object
+      assert_kind_of Replyr::BounceAddress, address
+      assert_equal @user, address.model
+    end
+  end
+
+  describe '#bounce_address' do
+    it 'returns bounce return_path address string' do
+      @user = User.create
+      address = @user.bounce_address
+      assert_kind_of String, address
+    end
+  end
+  
+  describe '#handle_bounce' do
+    it 'receives the passed reply and calls block' do
+      user = User.create(email: "test@example.com")
+      assert_equal false, user.email_invalid?
+      user.handle_bounce(user.email)
+      new_count = Comment.count
+      assert_equal true, user.email_invalid?
+    end
+  end
+
+end

data/test/replyr/handle_reply_test.rb

@@ -2,7 +2,7 @@ require_relative '../test_helper'
 
 setup_database
 
-describe Replyr::HandleReply do
+describe Replyr::HandleBounce do
   describe '#reply_address_object_for_user' do
     it 'returns reply address object' do
       @user1 = User.create

data/test/test_helper.rb

@@ -16,7 +16,7 @@ Dir["#{File.dirname(__FILE__)}/support/**/*.rb"].each { |f| require f }
 
 def setup_database
   ActiveRecord::Base.connection.execute("DROP TABLE IF EXISTS users")
-  ActiveRecord::Base.connection.execute("CREATE TABLE users (id INTEGER PRIMARY KEY, name TEXT)")
+  ActiveRecord::Base.connection.execute("CREATE TABLE users (id INTEGER PRIMARY KEY, name TEXT, email TEXT, email_invalid BOOLEAN)")
 
   ActiveRecord::Base.connection.execute("DROP TABLE IF EXISTS comments")
   ActiveRecord::Base.connection.execute("CREATE TABLE comments (id INTEGER PRIMARY KEY, body TEXT, user_id INTEGER)")

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: replyr
 version: !ruby/object:Gem::Version
-  version: 0.0.7
+  version: 0.0.8
 platform: ruby
 authors:
 - Philipp Wüllner
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-03-23 00:00:00.000000000 Z
+date: 2014-03-24 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: mailman
@@ -108,11 +108,14 @@ files:
 - lib/generators/replyr/templates/mailman_server
 - lib/generators/replyr/templates/replyr.rb.erb
 - lib/mailman_monkey_patch.rb
+- lib/replyr/address_builder.rb
+- lib/replyr/bounce_address.rb
 - lib/replyr/config.rb
+- lib/replyr/email.rb
 - lib/replyr/engine.rb
+- lib/replyr/handle_bounce.rb
 - lib/replyr/handle_reply.rb
 - lib/replyr/reply_address.rb
-- lib/replyr/reply_email.rb
 - lib/replyr/version.rb
 - lib/replyr.rb
 - lib/tasks/replyr_tasks.rake
@@ -204,13 +207,17 @@ files:
 - test/email_reply_parser/emails/email_sent_from_my_not_signature.txt
 - test/email_reply_parser/emails/email_was_showing_as_nothing_visible.txt
 - test/email_reply_parser/emails/new_content/email_1_2.txt
+- test/replyr/bounce_address_test.rb
+- test/replyr/email_test.rb
+- test/replyr/emails/bounce_422.eml
+- test/replyr/emails/bounce_530.eml
 - test/replyr/emails/reply_multipart.eml
 - test/replyr/emails/reply_plain.eml
 - test/replyr/emails/reply_plain_signature.eml
 - test/replyr/emails/reply_with_attachment.eml
+- test/replyr/handle_bounce_test.rb
 - test/replyr/handle_reply_test.rb
 - test/replyr/reply_address_test.rb
-- test/replyr/reply_email_test.rb
 - test/replyr_test.rb
 - test/test_helper.rb
 - CHANGELOG.md