]> git.cworth.org Git - notmuch-old/blob - test/T220-reply.sh
lib/message: catch exceptions in _n_m_add_term
[notmuch-old] / test / T220-reply.sh
1 #!/usr/bin/env bash
2 test_description="\"notmuch reply\" in several variations"
3 . $(dirname "$0")/test-lib.sh || exit 1
4
5 add_message '[from]="Sender <sender@example.com>"' \
6              [to]=test_suite@notmuchmail.org \
7              [subject]=notmuch-reply-test \
8             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
9             '[body]="basic reply test"'
10
11 cat <<EOF > basic.expected
12 From: Notmuch Test Suite <test_suite@notmuchmail.org>
13 Subject: Re: notmuch-reply-test
14 To: Sender <sender@example.com>
15 In-Reply-To: <${gen_msg_id}>
16 References: <${gen_msg_id}>
17
18 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
19 > basic reply test
20 OK
21 EOF
22
23 test_begin_subtest "Basic reply"
24 notmuch reply id:${gen_msg_id} >OUTPUT 2>&1 && echo OK >> OUTPUT
25 test_expect_equal_file basic.expected OUTPUT
26
27 if [ $NOTMUCH_HAVE_SFSEXP -eq 1 ]; then
28
29     test_begin_subtest "Basic reply (query=sexp)"
30     notmuch reply --query=sexp "(id ${gen_msg_id})" >OUTPUT 2>&1 && echo OK >> OUTPUT
31     test_expect_equal_file basic.expected OUTPUT
32 fi
33
34 test_begin_subtest "Multiple recipients"
35 add_message '[from]="Sender <sender@example.com>"' \
36             '[to]="test_suite@notmuchmail.org, Someone Else <someone@example.com>"' \
37              [subject]=notmuch-reply-test \
38             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
39             '[body]="Multiple recipients"'
40
41 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
42 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
43 Subject: Re: notmuch-reply-test
44 To: Sender <sender@example.com>, Someone Else <someone@example.com>
45 In-Reply-To: <${gen_msg_id}>
46 References: <${gen_msg_id}>
47
48 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
49 > Multiple recipients
50 OK"
51
52 test_begin_subtest "Reply with CC"
53 add_message '[from]="Sender <sender@example.com>"' \
54              [to]=test_suite@notmuchmail.org \
55             '[cc]="Other Parties <cc@example.com>"' \
56              [subject]=notmuch-reply-test \
57             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
58             '[body]="reply with CC"'
59
60 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
61 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
62 Subject: Re: notmuch-reply-test
63 To: Sender <sender@example.com>
64 Cc: Other Parties <cc@example.com>
65 In-Reply-To: <${gen_msg_id}>
66 References: <${gen_msg_id}>
67
68 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
69 > reply with CC
70 OK"
71
72 test_begin_subtest "Reply from alternate address"
73 add_message '[from]="Sender <sender@example.com>"' \
74              [to]=test_suite_other@notmuchmail.org \
75              [subject]=notmuch-reply-test \
76             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
77             '[body]="reply from alternate address"'
78
79 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
80 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite_other@notmuchmail.org>
81 Subject: Re: notmuch-reply-test
82 To: Sender <sender@example.com>
83 In-Reply-To: <${gen_msg_id}>
84 References: <${gen_msg_id}>
85
86 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
87 > reply from alternate address
88 OK"
89
90 test_begin_subtest "Reply from address in named group list"
91 add_message '[from]="Sender <sender@example.com>"' \
92             '[to]=group:test_suite@notmuchmail.org,someone@example.com\;' \
93              [cc]=test_suite_other@notmuchmail.org \
94              [subject]=notmuch-reply-test \
95             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
96             '[body]="Reply from address in named group list"'
97
98 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
99 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
100 Subject: Re: notmuch-reply-test
101 To: Sender <sender@example.com>, someone@example.com
102 In-Reply-To: <${gen_msg_id}>
103 References: <${gen_msg_id}>
104
105 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
106 > Reply from address in named group list
107 OK"
108
109 test_begin_subtest "Support for Reply-To"
110 add_message '[from]="Sender <sender@example.com>"' \
111              [to]=test_suite@notmuchmail.org \
112              [subject]=notmuch-reply-test \
113             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
114             '[body]="support for reply-to"' \
115             '[reply-to]="Sender <elsewhere@example.com>"'
116
117 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
118 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
119 Subject: Re: notmuch-reply-test
120 To: Sender <elsewhere@example.com>
121 In-Reply-To: <${gen_msg_id}>
122 References: <${gen_msg_id}>
123
124 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
125 > support for reply-to
126 OK"
127
128 test_begin_subtest "Un-munging Reply-To"
129 add_message '[from]="Sender <sender@example.com>"' \
130             '[to]="Some List <list@example.com>"' \
131              [subject]=notmuch-reply-test \
132             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
133             '[body]="Un-munging Reply-To"' \
134             '[reply-to]="Evil Munging List <list@example.com>"'
135
136 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
137 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
138 Subject: Re: notmuch-reply-test
139 To: Sender <sender@example.com>, Some List <list@example.com>
140 In-Reply-To: <${gen_msg_id}>
141 References: <${gen_msg_id}>
142
143 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
144 > Un-munging Reply-To
145 OK"
146
147 test_begin_subtest "Un-munging Reply-To With Exact Match"
148 add_message '[from]="Sender <sender@example.com>"' \
149             '[to]="Some List <list@example.com>"' \
150              [subject]=notmuch-reply-test \
151             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
152             '[body]="Un-munging Reply-To"' \
153             '[reply-to]="Some List <list@example.com>"'
154
155 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
156 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
157 Subject: Re: notmuch-reply-test
158 To: Sender <sender@example.com>, Some List <list@example.com>
159 In-Reply-To: <${gen_msg_id}>
160 References: <${gen_msg_id}>
161
162 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
163 > Un-munging Reply-To
164 OK"
165
166 test_begin_subtest "Un-munging Reply-To With Raw addr-spec"
167 add_message '[from]="Sender <sender@example.com>"' \
168             '[to]="Some List <list@example.com>"' \
169              [subject]=notmuch-reply-test \
170             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
171             '[body]="Un-munging Reply-To"' \
172             '[reply-to]="list@example.com"'
173
174 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
175 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
176 Subject: Re: notmuch-reply-test
177 To: Sender <sender@example.com>, Some List <list@example.com>
178 In-Reply-To: <${gen_msg_id}>
179 References: <${gen_msg_id}>
180
181 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
182 > Un-munging Reply-To
183 OK"
184
185 test_begin_subtest "Message with header of exactly 200 bytes"
186 add_message '[subject]="This subject is exactly 200 bytes in length. Other than its length there is not much of note here. Note that the length of 200 bytes includes the Subject: and Re: prefixes with two spaces"' \
187             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
188             '[body]="200-byte header"'
189 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
190 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
191 Subject: Re: This subject is exactly 200 bytes in length. Other than its
192  length there is not much of note here. Note that the length of 200 bytes
193  includes the Subject: and Re: prefixes with two spaces
194 To: test_suite@notmuchmail.org
195 In-Reply-To: <${gen_msg_id}>
196 References: <${gen_msg_id}>
197
198 On Tue, 05 Jan 2010 15:43:56 -0000, Notmuch Test Suite <test_suite@notmuchmail.org> wrote:
199 > 200-byte header
200 OK"
201
202 test_begin_subtest "From guessing: Envelope-To"
203 add_message '[from]="Sender <sender@example.com>"' \
204             '[to]="Recipient <recipient@example.com>"' \
205             '[subject]="From guessing"' \
206             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
207             '[body]="From guessing"' \
208             '[header]="Envelope-To: test_suite_other@notmuchmail.org"'
209
210 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
211 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite_other@notmuchmail.org>
212 Subject: Re: From guessing
213 To: Sender <sender@example.com>, Recipient <recipient@example.com>
214 In-Reply-To: <${gen_msg_id}>
215 References: <${gen_msg_id}>
216
217 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
218 > From guessing
219 OK"
220
221 test_begin_subtest "From guessing: X-Original-To"
222 add_message '[from]="Sender <sender@example.com>"' \
223             '[to]="Recipient <recipient@example.com>"' \
224             '[subject]="From guessing"' \
225             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
226             '[body]="From guessing"' \
227             '[header]="X-Original-To: test_suite@otherdomain.org"'
228
229 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
230 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@otherdomain.org>
231 Subject: Re: From guessing
232 To: Sender <sender@example.com>, Recipient <recipient@example.com>
233 In-Reply-To: <${gen_msg_id}>
234 References: <${gen_msg_id}>
235
236 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
237 > From guessing
238 OK"
239
240 test_begin_subtest "From guessing: Delivered-To"
241 add_message '[from]="Sender <sender@example.com>"' \
242             '[to]="Recipient <recipient@example.com>"' \
243             '[subject]="From guessing"' \
244             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
245             '[body]="From guessing"' \
246             '[header]="Delivered-To: test_suite_other@notmuchmail.org"'
247
248 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
249 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite_other@notmuchmail.org>
250 Subject: Re: From guessing
251 To: Sender <sender@example.com>, Recipient <recipient@example.com>
252 In-Reply-To: <${gen_msg_id}>
253 References: <${gen_msg_id}>
254
255 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
256 > From guessing
257 OK"
258
259 test_begin_subtest "From guessing: multiple Delivered-To"
260 add_message '[from]="Sender <sender@example.com>"' \
261             '[to]="Recipient <recipient@example.com>"' \
262             '[subject]="From guessing"' \
263             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
264             '[body]="From guessing"' \
265             '[header]="Delivered-To: test_suite_other@notmuchmail.org
266 Delivered-To: test_suite@notmuchmail.org"'
267
268 output=$(notmuch reply id:${gen_msg_id} 2>&1 && echo OK)
269 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
270 Subject: Re: From guessing
271 To: Sender <sender@example.com>, Recipient <recipient@example.com>
272 In-Reply-To: <${gen_msg_id}>
273 References: <${gen_msg_id}>
274
275 On Tue, 05 Jan 2010 15:43:56 -0000, Sender <sender@example.com> wrote:
276 > From guessing
277 OK"
278
279 test_begin_subtest "Reply with RFC 2047-encoded headers"
280 add_message '[subject]="=?iso-8859-1?q?=e0=df=e7?="' \
281             '[from]="=?utf-8?q?=e2=98=83?= <snowman@example.com>"' \
282             '[date]="Tue, 05 Jan 2010 15:43:56 -0000"' \
283             '[body]="Encoding"'
284
285 # GMime happens to change from Q- to B-encoding.  We canonicalize the
286 # case of the encoding and charset because different versions of GMime
287 # capitalize the encoding differently.
288 output=$( (notmuch reply id:${gen_msg_id} 2>&1 && echo OK) | perl -pe 's/=\?[^?]+\?[bB]\?/lc($&)/ge')
289 test_expect_equal "$output" "\
290 From: Notmuch Test Suite <test_suite@notmuchmail.org>
291 Subject: Re: =?iso-8859-1?b?4N/n?=
292 To: =?utf-8?b?4piD?= <snowman@example.com>
293 In-Reply-To: <${gen_msg_id}>
294 References: <${gen_msg_id}>
295
296 On Tue, 05 Jan 2010 15:43:56 -0000, ☃ <snowman@example.com> wrote:
297 > Encoding
298 OK"
299
300 test_begin_subtest "Reply with RFC 2047-encoded headers (JSON)"
301 output=$(echo '{"answer":' && notmuch reply --format=json id:${gen_msg_id} 2>&1 && echo ', "success": "OK"}')
302 test_expect_equal_json "$output" '
303 {  "answer": {
304     "original": {
305         "body": [
306             {
307                 "content": "Encoding\n",
308                 "content-type": "text/plain",
309                 "id": 1
310             }
311         ],
312         "crypto": {},
313         "date_relative": "2010-01-05",
314         "excluded": false,
315         "filename": ["'${MAIL_DIR}'/msg-015"],
316         "headers": {
317             "Date": "Tue, 05 Jan 2010 15:43:56 +0000",
318             "From": "\u2603 <snowman@example.com>",
319             "Subject": "\u00e0\u00df\u00e7",
320             "To": "Notmuch Test Suite <test_suite@notmuchmail.org>"
321         },
322         "id": "'${gen_msg_id}'",
323         "match": false,
324         "tags": [
325             "inbox",
326             "unread"
327         ],
328         "timestamp": 1262706236
329     },
330     "reply-headers": {
331         "From": "Notmuch Test Suite <test_suite@notmuchmail.org>",
332         "In-reply-to": "<'${gen_msg_id}'>",
333         "References": "<'${gen_msg_id}'>",
334         "Subject": "Re: \u00e0\u00df\u00e7",
335         "To": "\u2603 <snowman@example.com>"
336     }
337   },
338   "success": "OK"
339 }'
340
341 test_begin_subtest "Reply to a message with multiple Cc headers"
342 add_email_corpus broken
343 output=$(notmuch reply id:multiple-cc@example.org 2>&1 && echo OK)
344 test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
345 Subject: Re: wowsers!
346 To: Alice <alice@example.org>, Daniel <daniel@example.org>
347 Cc: Bob <bob@example.org>, Charles <charles@example.org>
348 In-Reply-To: <multiple-cc@example.org>
349 References: <multiple-cc@example.org>
350
351 On Thu, 16 Jun 2016 22:14:41 -0400, Alice <alice@example.org> wrote:
352 > Note the Cc: and cc: headers.
353 OK"
354
355 test_done