[PATCH v3 6/9] test: New test for incremental search output parsing

diff --git a/3b/318d7c2ecee60b326e271729bc9e6b9624ed44 b/3b/318d7c2ecee60b326e271729bc9e6b9624ed44
new file mode 100644 (file)
index 0000000..8178143
--- /dev/null
+++ b/3b/318d7c2ecee60b326e271729bc9e6b9624ed44
@@ -0,0 +1,129 @@
+Return-Path: <amdragon@mit.edu>\r
+X-Original-To: notmuch@notmuchmail.org\r
+Delivered-To: notmuch@notmuchmail.org\r
+Received: from localhost (localhost [127.0.0.1])\r
+       by olra.theworths.org (Postfix) with ESMTP id 41CA6429E36\r
+       for <notmuch@notmuchmail.org>; Mon,  9 Jul 2012 14:42:51 -0700 (PDT)\r
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
+X-Spam-Flag: NO\r
+X-Spam-Score: -0.7\r
+X-Spam-Level: \r
+X-Spam-Status: No, score=-0.7 tagged_above=-999 required=5\r
+       tests=[RCVD_IN_DNSWL_LOW=-0.7] autolearn=disabled\r
+Received: from olra.theworths.org ([127.0.0.1])\r
+       by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
+       with ESMTP id U0i4V3j69AU3 for <notmuch@notmuchmail.org>;\r
+       Mon,  9 Jul 2012 14:42:50 -0700 (PDT)\r
+Received: from dmz-mailsec-scanner-2.mit.edu (DMZ-MAILSEC-SCANNER-2.MIT.EDU\r
+       [18.9.25.13])\r
+       by olra.theworths.org (Postfix) with ESMTP id 905CE431E64\r
+       for <notmuch@notmuchmail.org>; Mon,  9 Jul 2012 14:42:49 -0700 (PDT)\r
+X-AuditID: 1209190d-b7fd56d000000933-90-4ffb50585e32\r
+Received: from mailhub-auth-2.mit.edu ( [18.7.62.36])\r
+       by dmz-mailsec-scanner-2.mit.edu (Symantec Messaging Gateway) with SMTP\r
+       id A8.19.02355.8505BFF4; Mon,  9 Jul 2012 17:42:48 -0400 (EDT)\r
+Received: from outgoing.mit.edu (OUTGOING-AUTH.MIT.EDU [18.7.22.103])\r
+       by mailhub-auth-2.mit.edu (8.13.8/8.9.2) with ESMTP id q69Lgl1p003850; \r
+       Mon, 9 Jul 2012 17:42:47 -0400\r
+Received: from drake.dyndns.org (26-4-176.dynamic.csail.mit.edu [18.26.4.176])\r
+       (authenticated bits=0)\r
+       (User authenticated as amdragon@ATHENA.MIT.EDU)\r
+       by outgoing.mit.edu (8.13.6/8.12.4) with ESMTP id q69LgiQM022688\r
+       (version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NOT);\r
+       Mon, 9 Jul 2012 17:42:47 -0400 (EDT)\r
+Received: from amthrax by drake.dyndns.org with local (Exim 4.77)\r
+       (envelope-from <amdragon@mit.edu>)\r
+       id 1SoLjA-0004g3-1i; Mon, 09 Jul 2012 17:42:44 -0400\r
+From: Austin Clements <amdragon@MIT.EDU>\r
+To: notmuch@notmuchmail.org\r
+Subject: [PATCH v3 6/9] test: New test for incremental search output parsing\r
+Date: Mon,  9 Jul 2012 17:42:39 -0400\r
+Message-Id: <1341870162-17782-7-git-send-email-amdragon@mit.edu>\r
+X-Mailer: git-send-email 1.7.10\r
+In-Reply-To: <1341870162-17782-1-git-send-email-amdragon@mit.edu>\r
+References: <1341354059-29396-1-git-send-email-amdragon@mit.edu>\r
+       <1341870162-17782-1-git-send-email-amdragon@mit.edu>\r
+X-Brightmail-Tracker:\r
+ H4sIAAAAAAAAA+NgFjrOIsWRmVeSWpSXmKPExsUixG6nohsR8Nvf4MNzQ4vVc3ksrt+cyWzx\r
+       ZuU8Vgdmj52z7rJ7HP66kMXj2apbzAHMUVw2Kak5mWWpRfp2CVwZq882sxdc4q9o6j/H0sD4\r
+       laeLkZNDQsBEYuKOPewQtpjEhXvr2boYuTiEBPYxSjw78YUZwlnPKHH24RVGCOckk8SntmlQ\r
+       mbmMEt82vmEC6WcT0JDYtn85I4gtIiAtsfPubFYQm1kgTmLLlP9gcWEBH4l77/aC7WMRUJX4\r
+       +7UBrJdXwEHi4osPrBB3yEs8vd/HBmJzCjhKzLm5A6xXSKBc4vONf8wTGPkXMDKsYpRNya3S\r
+       zU3MzClOTdYtTk7My0st0jXSy80s0UtNKd3ECAovTkneHYzvDiodYhTgYFTi4Y1i+u0vxJpY\r
+       VlyZe4hRkoNJSZQ3zxMoxJeUn1KZkVicEV9UmpNafIhRgoNZSYT3litQjjclsbIqtSgfJiXN\r
+       waIkznsl5aa/kEB6YklqdmpqQWoRTFaGg0NJgneaP1CjYFFqempFWmZOCUKaiYMTZDgP0PAJ\r
+       IDW8xQWJucWZ6RD5U4yKUuK8k0ESAiCJjNI8uF5Y/L9iFAd6RZh3B0gVDzB1wHW/AhrMBDS4\r
+       vecXyOCSRISUVAOjrcGOnPuJbyO3sFjzLzwv0fjt0FWRTx1LT67/OvPpi9Mzb7QY+txNfc9t\r
+       ckLg7p3/lica66TvHz+ubqk9xSbN77hN81Gv0pRp2zbNnLx65vfKpBc3HWdNzRftNi4T/NRW\r
+       2ha8T/jcRMmJhapVMybfW3D+3oVJLk5LdHuU/4vf2n81Nb3L+V5WshJLcUaioRZzUXEiAEgY\r
+       q0XaAgAA\r
+Cc: tomi.ollila@iki.fi\r
+X-BeenThere: notmuch@notmuchmail.org\r
+X-Mailman-Version: 2.1.13\r
+Precedence: list\r
+List-Id: "Use and development of the notmuch mail system."\r
+       <notmuch.notmuchmail.org>\r
+List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
+List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
+List-Post: <mailto:notmuch@notmuchmail.org>\r
+List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
+List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
+X-List-Received-Date: Mon, 09 Jul 2012 21:42:51 -0000\r
+\r
+This advises the search process filter to make it process one\r
+character at a time in order to test the pessimal case for incremental\r
+search output parsing.\r
+\r
+The text parser fails this test because it gets tricked into thinking\r
+a parenthetical remark in a subject is the tag list.\r
+---\r
+ test/emacs       |   11 +++++++++++\r
+ test/test-lib.el |    8 ++++++++\r
+ 2 files changed, 19 insertions(+)\r
+\r
+diff --git a/test/emacs b/test/emacs\r
+index e9f954c..293b12a 100755\r
+--- a/test/emacs\r
++++ b/test/emacs\r
+@@ -35,6 +35,17 @@ test_emacs '(notmuch-search "tag:inbox")\r
+           (test-output)'\r
+ test_expect_equal_file OUTPUT $EXPECTED/notmuch-search-tag-inbox\r
+ \r
++test_begin_subtest "Incremental parsing of search results"\r
++test_subtest_known_broken\r
++test_emacs "(ad-enable-advice 'notmuch-search-process-filter 'around 'pessimal)\r
++          (ad-activate 'notmuch-search-process-filter)\r
++          (notmuch-search \"tag:inbox\")\r
++          (notmuch-test-wait)\r
++          (ad-disable-advice 'notmuch-search-process-filter 'around 'pessimal)\r
++          (ad-activate 'notmuch-search-process-filter)\r
++          (test-output)"\r
++test_expect_equal_file OUTPUT $EXPECTED/notmuch-search-tag-inbox\r
++\r
+ test_begin_subtest "Navigation of notmuch-hello to search results"\r
+ test_emacs '(notmuch-hello)\r
+           (goto-char (point-min))\r
+diff --git a/test/test-lib.el b/test/test-lib.el\r
+index 6271da2..5dd6271 100644\r
+--- a/test/test-lib.el\r
++++ b/test/test-lib.el\r
+@@ -89,6 +89,14 @@ nothing."\r
+ (add-hook-counter 'notmuch-hello-mode-hook)\r
+ (add-hook-counter 'notmuch-hello-refresh-hook)\r
+ \r
++(defadvice notmuch-search-process-filter (around pessimal activate disable)\r
++  "Feed notmuch-search-process-filter one character at a time."\r
++  (let ((string (ad-get-arg 1)))\r
++    (loop for char across string\r
++        do (progn\r
++             (ad-set-arg 1 (char-to-string char))\r
++             ad-do-it))))\r
++\r
+ (defmacro notmuch-test-run (&rest body)\r
+   "Evaluate a BODY of test expressions and output the result."\r
+   `(with-temp-buffer\r
+-- \r
+1.7.10\r
+\r