git.cworth.org Git - notmuch/blob - test/T081-sexpr-search.sh

   1 #!/usr/bin/env bash
   2 test_description='"notmuch search" in several variations'
   3 . $(dirname "$0")/test-lib.sh || exit 1
   4
   5 if [ $NOTMUCH_HAVE_SFSEXP -ne 1 ]; then
   6     printf "Skipping due to missing sfsexp library\n"
   7     test_done
   8 fi
   9
  10 add_email_corpus
  11
  12 for query in '()' '(not)' '(and)' '(or ())' '(or (not))' '(or (and))' \
  13             '(or (and) (or) (not (and)))'; do
  14     test_begin_subtest "all messages: $query"
  15     notmuch search '*' > EXPECTED
  16     notmuch search --query=sexp "$query" > OUTPUT
  17     test_expect_equal_file EXPECTED OUTPUT
  18 done
  19
  20 for query in '(or)' '(not ())' '(not (not))' '(not (and))' \
  21                    '(not (or (and) (or) (not (and))))'; do
  22     test_begin_subtest "no messages: $query"
  23     notmuch search --query=sexp "$query" > OUTPUT
  24     test_expect_equal_file /dev/null OUTPUT
  25 done
  26
  27 test_begin_subtest "and of exact terms"
  28 notmuch search --query=sexp '(and "wonderful" "wizard")' | notmuch_search_sanitize > OUTPUT
  29 cat <<EOF > EXPECTED
  30 thread:XXX   2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
  31 EOF
  32 test_expect_equal_file EXPECTED OUTPUT
  33
  34 test_begin_subtest "or of exact terms"
  35 notmuch search --query=sexp '(or "php" "wizard")' | notmuch_search_sanitize > OUTPUT
  36 cat <<EOF > EXPECTED
  37 thread:XXX   2010-12-29 [1/1] François Boulogne; [aur-general] Guidelines: cp, mkdir vs install (inbox unread)
  38 thread:XXX   2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
  39 EOF
  40 test_expect_equal_file EXPECTED OUTPUT
  41
  42 test_begin_subtest "single term in body"
  43 notmuch search --query=sexp 'wizard' | notmuch_search_sanitize>OUTPUT
  44 cat <<EOF > EXPECTED
  45 thread:XXX   2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
  46 EOF
  47 test_expect_equal_file EXPECTED OUTPUT
  48
  49 test_begin_subtest "single term in body (case insensitive)"
  50 notmuch search --query=sexp 'Wizard' | notmuch_search_sanitize>OUTPUT
  51 cat <<EOF > EXPECTED
  52 thread:XXX   2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
  53 EOF
  54 test_expect_equal_file EXPECTED OUTPUT
  55
  56 test_begin_subtest "single term in body, stemmed version"
  57 notmuch search arriv > EXPECTED
  58 notmuch search --query=sexp arriv > OUTPUT
  59 test_expect_equal_file EXPECTED OUTPUT
  60
  61 test_begin_subtest "single term in body, unstemmed version"
  62 notmuch search --query=sexp '"arriv"' > OUTPUT
  63 test_expect_equal_file /dev/null OUTPUT
  64
  65 test_begin_subtest "Search by 'subject'"
  66 add_message [subject]=subjectsearchtest '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
  67 output=$(notmuch search --query=sexp '(subject subjectsearchtest)' | notmuch_search_sanitize)
  68 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)"
  69
  70 test_begin_subtest "Search by 'subject' (case insensitive)"
  71 notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
  72 notmuch search --query=sexp '(subject "Maildir")' | notmuch_search_sanitize > OUTPUT
  73 test_expect_equal_file EXPECTED OUTPUT
  74
  75 test_begin_subtest "Search by 'subject' (utf-8):"
  76 add_message [subject]=utf8-sübjéct '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
  77 output=$(notmuch search --query=sexp '(subject utf8 sübjéct)' | notmuch_search_sanitize)
  78 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
  79
  80 test_begin_subtest "Search by 'subject' (utf-8, and):"
  81 output=$(notmuch search --query=sexp '(subject (and utf8 sübjéct))' | notmuch_search_sanitize)
  82 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
  83
  84 test_begin_subtest "Search by 'subject' (utf-8, and outside):"
  85 output=$(notmuch search --query=sexp '(and (subject utf8) (subject sübjéct))' | notmuch_search_sanitize)
  86 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
  87
  88 test_begin_subtest "Search by 'subject' (utf-8, or):"
  89 notmuch search --query=sexp '(subject (or utf8 subjectsearchtest))' | notmuch_search_sanitize > OUTPUT
  90 cat <<EOF > EXPECTED
  91 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)
  92 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
  93 EOF
  94 test_expect_equal_file EXPECTED OUTPUT
  95
  96 test_begin_subtest "Search by 'subject' (utf-8, or outside):"
  97 notmuch search --query=sexp '(or (subject utf8) (subject subjectsearchtest))' | notmuch_search_sanitize > OUTPUT
  98 cat <<EOF > EXPECTED
  99 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)
 100 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
 101 EOF
 102 test_expect_equal_file EXPECTED OUTPUT
 103
 104 test_begin_subtest "Search by 'attachment'"
 105 notmuch search attachment:notmuch-help.patch > EXPECTED
 106 notmuch search --query=sexp '(attachment notmuch-help.patch)' > OUTPUT
 107 test_expect_equal_file EXPECTED OUTPUT
 108
 109 test_begin_subtest "Search by 'body'"
 110 add_message '[subject]="body search"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [body]=bodysearchtest
 111 output=$(notmuch search --query=sexp '(body bodysearchtest)' | notmuch_search_sanitize)
 112 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; body search (inbox unread)"
 113
 114 test_begin_subtest "Search by 'body' (phrase)"
 115 add_message '[subject]="body search (phrase)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="body search (phrase)"'
 116 add_message '[subject]="negative result"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="This phrase should not match the body search"'
 117 output=$(notmuch search --query=sexp '(body "body search phrase")' | notmuch_search_sanitize)
 118 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; body search (phrase) (inbox unread)"
 119
 120 test_begin_subtest "Search by 'body' (utf-8):"
 121 add_message '[subject]="utf8-message-body-subject"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="message body utf8: bödý"'
 122 output=$(notmuch search --query=sexp '(body bödý)' | notmuch_search_sanitize)
 123 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-message-body-subject (inbox unread)"
 124
 125 add_message "[body]=thebody-1" "[subject]=kryptonite-1"
 126 add_message "[body]=nothing-to-see-here-1" "[subject]=thebody-1"
 127
 128 test_begin_subtest 'search without body: prefix'
 129 notmuch search thebody > EXPECTED
 130 notmuch search --query=sexp '(and thebody)' > OUTPUT
 131 test_expect_equal_file EXPECTED OUTPUT
 132
 133 test_begin_subtest 'negated body: prefix'
 134 notmuch search thebody and not body:thebody > EXPECTED
 135 notmuch search --query=sexp '(and (not (body thebody)) thebody)' > OUTPUT
 136 test_expect_equal_file EXPECTED OUTPUT
 137
 138 test_begin_subtest 'search unprefixed for prefixed term'
 139 notmuch search kryptonite > EXPECTED
 140 notmuch search --query=sexp '(and kryptonite)' > OUTPUT
 141 test_expect_equal_file EXPECTED OUTPUT
 142
 143 test_begin_subtest 'search with body: prefix for term only in subject'
 144 notmuch search body:kryptonite > EXPECTED
 145 notmuch search --query=sexp '(body kryptonite)' > OUTPUT
 146 test_expect_equal_file EXPECTED OUTPUT
 147
 148 test_begin_subtest "Search by 'from'"
 149 add_message '[subject]="search by from"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [from]=searchbyfrom
 150 output=$(notmuch search --query=sexp '(from searchbyfrom)' | notmuch_search_sanitize)
 151 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] searchbyfrom; search by from (inbox unread)"
 152
 153 test_begin_subtest "Search by 'from' (address)"
 154 add_message '[subject]="search by from (address)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [from]=searchbyfrom@example.com
 155 output=$(notmuch search --query=sexp '(from searchbyfrom@example.com)' | notmuch_search_sanitize)
 156 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] searchbyfrom@example.com; search by from (address) (inbox unread)"
 157
 158 test_begin_subtest "Search by 'from' (name)"
 159 add_message '[subject]="search by from (name)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[from]="Search By From Name <test@example.com>"'
 160 output=$(notmuch search --query=sexp '(from "Search By From Name")' | notmuch_search_sanitize)
 161 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Search By From Name; search by from (name) (inbox unread)"
 162
 163 test_begin_subtest "Search by 'from' (name and address)"
 164 output=$(notmuch search --query=sexp '(from "Search By From Name <test@example.com>")' | notmuch_search_sanitize)
 165 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Search By From Name; search by from (name) (inbox unread)"
 166
 167 add_message '[dir]=bad' '[subject]="To the bone"'
 168 add_message '[dir]=.' '[subject]="Top level"'
 169 add_message '[dir]=bad/news' '[subject]="Bears"'
 170 mkdir -p "${MAIL_DIR}/duplicate/bad/news"
 171 cp "$gen_msg_filename" "${MAIL_DIR}/duplicate/bad/news"
 172
 173 add_message '[dir]=things' '[subject]="These are a few"'
 174 add_message '[dir]=things/favorite' '[subject]="Raindrops, whiskers, kettles"'
 175 add_message '[dir]=things/bad' '[subject]="Bites, stings, sad feelings"'
 176
 177 test_begin_subtest "Search by 'folder' (multiple)"
 178 output=$(notmuch search --query=sexp '(folder bad bad/news things/bad)' | notmuch_search_sanitize)
 179 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
 180 thread:XXX   2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
 181 thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
 182
 183 test_begin_subtest "Search by 'folder': top level."
 184 notmuch search folder:'""' > EXPECTED
 185 notmuch search --query=sexp '(folder "")'  > OUTPUT
 186 test_expect_equal_file EXPECTED OUTPUT
 187
 188 test_begin_subtest "Search by 'id'"
 189 add_message '[subject]="search by id"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 190 output=$(notmuch search --query=sexp "(id ${gen_msg_id})" | notmuch_search_sanitize)
 191 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by id (inbox unread)"
 192
 193 test_begin_subtest "Search by 'id' (or)"
 194 add_message '[subject]="search by id"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 195 output=$(notmuch search --query=sexp "(id non-existent-mid ${gen_msg_id})" | notmuch_search_sanitize)
 196 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by id (inbox unread)"
 197
 198 test_begin_subtest "Search by 'is' (multiple)"
 199 notmuch tag -inbox tag:searchbytag
 200 notmuch search is:inbox AND is:unread | notmuch_search_sanitize > EXPECTED
 201 notmuch search --query=sexp '(is inbox unread)' | notmuch_search_sanitize > OUTPUT
 202 notmuch tag +inbox tag:searchbytag
 203 test_expect_equal_file EXPECTED OUTPUT
 204
 205 test_begin_subtest "Search by 'mid'"
 206 add_message '[subject]="search by mid"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 207 output=$(notmuch search --query=sexp "(mid ${gen_msg_id})" | notmuch_search_sanitize)
 208 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by mid (inbox unread)"
 209
 210 test_begin_subtest "Search by 'mid' (or)"
 211 add_message '[subject]="search by mid"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 212 output=$(notmuch search --query=sexp "(mid non-existent-mid ${gen_msg_id})" | notmuch_search_sanitize)
 213 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by mid (inbox unread)"
 214
 215 test_begin_subtest "Search by 'mimetype'"
 216 notmuch search mimetype:text/html > EXPECTED
 217 notmuch search --query=sexp '(mimetype text html)'  > OUTPUT
 218 test_expect_equal_file EXPECTED OUTPUT
 219
 220 QUERYSTR="date:2009-11-18..2009-11-18 and tag:unread"
 221 QUERYSTR2="query:test and subject:Maildir"
 222 notmuch config set --database query.test "$QUERYSTR"
 223 notmuch config set query.test2 "$QUERYSTR2"
 224
 225 test_begin_subtest "ill-formed named query search"
 226 notmuch search --query=sexp '(query)' > OUTPUT 2>&1
 227 cat <<EOF > EXPECTED
 228 notmuch search: Syntax error in query
 229 'query' expects single atom as argument
 230 EOF
 231 test_expect_equal_file EXPECTED OUTPUT
 232
 233 test_begin_subtest "ill-formed named query search 2"
 234 notmuch search --query=sexp '(to (query))' > OUTPUT 2>&1
 235 cat <<EOF > EXPECTED
 236 notmuch search: Syntax error in query
 237 'query' not supported inside 'to'
 238 EOF
 239 test_expect_equal_file EXPECTED OUTPUT
 240
 241 test_begin_subtest "search named query"
 242 notmuch search --query=sexp '(query test)' > OUTPUT
 243 notmuch search $QUERYSTR > EXPECTED
 244 test_expect_equal_file EXPECTED OUTPUT
 245
 246 test_begin_subtest "Search by 'subject' (utf-8, phrase-token):"
 247 output=$(notmuch search --query=sexp '(subject utf8-sübjéct)' | notmuch_search_sanitize)
 248 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
 249
 250 test_begin_subtest "search named query with other terms"
 251 notmuch search --query=sexp '(and (query test) (subject Maildir))' > OUTPUT
 252 notmuch search $QUERYSTR and subject:Maildir > EXPECTED
 253 test_expect_equal_file EXPECTED OUTPUT
 254
 255 test_begin_subtest "search nested named query"
 256 notmuch search --query=sexp '(query test2)' > OUTPUT
 257 notmuch search $QUERYSTR2 > EXPECTED
 258 test_expect_equal_file EXPECTED OUTPUT
 259
 260 test_begin_subtest "Search by 'subject' (utf-8, quoted string):"
 261 output=$(notmuch search --query=sexp '(subject "utf8 sübjéct")' | notmuch_search_sanitize)
 262 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
 263
 264 test_begin_subtest "Search by 'subject' (combine phrase, term):"
 265 output=$(notmuch search --query=sexp '(subject Mac "compatibility issues")' | notmuch_search_sanitize)
 266 test_expect_equal "$output" "thread:XXX   2009-11-18 [4/4] Jjgod Jiang, Alexander Botero-Lowry; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)"
 267
 268 test_begin_subtest "Search by 'subject' (combine phrase, term 2):"
 269 notmuch search --query=sexp '(subject (or utf8 "compatibility issues"))' | notmuch_search_sanitize > OUTPUT
 270 cat <<EOF > EXPECTED
 271 thread:XXX   2009-11-18 [4/4] Jjgod Jiang, Alexander Botero-Lowry; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
 272 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
 273 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; utf8-message-body-subject (inbox unread)
 274 EOF
 275 test_expect_equal_file EXPECTED OUTPUT
 276
 277 test_begin_subtest "Search by 'subject' (combine phrase, term 3):"
 278 notmuch search --query=sexp '(subject issues X/Darwin)' | notmuch_search_sanitize > OUTPUT
 279 cat <<EOF > EXPECTED
 280 thread:XXX   2009-11-18 [4/4] Jjgod Jiang, Alexander Botero-Lowry; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
 281 EOF
 282 test_expect_equal_file EXPECTED OUTPUT
 283
 284 test_begin_subtest "Search by 'tag'"
 285 add_message '[subject]="search by tag"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 286 notmuch tag +searchbytag id:${gen_msg_id}
 287 output=$(notmuch search --query=sexp '(tag searchbytag)' | notmuch_search_sanitize)
 288 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)"
 289
 290 test_begin_subtest "Search by 'tag' (multiple)"
 291 notmuch tag -inbox tag:searchbytag
 292 notmuch search tag:inbox AND tag:unread | notmuch_search_sanitize > EXPECTED
 293 notmuch search --query=sexp '(tag inbox unread)' | notmuch_search_sanitize > OUTPUT
 294 notmuch tag +inbox tag:searchbytag
 295 test_expect_equal_file EXPECTED OUTPUT
 296
 297 test_begin_subtest "Search by 'tag' and 'subject'"
 298 notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
 299 notmuch search --query=sexp '(and (tag inbox) (subject maildir))' | notmuch_search_sanitize > OUTPUT
 300 test_expect_equal_file EXPECTED OUTPUT
 301
 302 test_begin_subtest "Search by 'thread'"
 303 add_message '[subject]="search by thread"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
 304 thread_id=$(notmuch search id:${gen_msg_id} | sed -e "s/thread:\([a-f0-9]*\).*/\1/")
 305 output=$(notmuch search --query=sexp "(thread ${thread_id})" | notmuch_search_sanitize)
 306 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by thread (inbox unread)"
 307
 308 test_begin_subtest "Search by 'to'"
 309 add_message '[subject]="search by to"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [to]=searchbyto
 310 output=$(notmuch search --query=sexp '(to searchbyto)' | notmuch_search_sanitize)
 311 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (inbox unread)"
 312
 313 test_begin_subtest "Search by 'to' (address)"
 314 add_message '[subject]="search by to (address)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [to]=searchbyto@example.com
 315 output=$(notmuch search --query=sexp '(to searchbyto@example.com)' | notmuch_search_sanitize)
 316 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (address) (inbox unread)"
 317
 318 test_begin_subtest "Search by 'to' (name)"
 319 add_message '[subject]="search by to (name)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[to]="Search By To Name <test@example.com>"'
 320 output=$(notmuch search --query=sexp '(to "Search By To Name")' | notmuch_search_sanitize)
 321 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)"
 322
 323 test_begin_subtest "Search by 'to' (name and address)"
 324 output=$(notmuch search --query=sexp '(to "Search By To Name <test@example.com>")' | notmuch_search_sanitize)
 325 test_expect_equal "$output" "thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)"
 326
 327 test_begin_subtest "starts-with, no prefix"
 328 output=$(notmuch search --query=sexp '(starts-with prelim)' | notmuch_search_sanitize)
 329 test_expect_equal "$output" "thread:XXX   2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)"
 330
 331 test_begin_subtest "starts-with, case-insensitive"
 332 notmuch search --query=sexp '(starts-with FreeB)' | notmuch_search_sanitize > OUTPUT
 333 cat <<EOF > EXPECTED
 334 thread:XXX   2009-11-18 [3/4] Alexander Botero-Lowry, Jjgod Jiang; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
 335 thread:XXX   2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)
 336 EOF
 337 test_expect_equal_file EXPECTED OUTPUT
 338
 339 test_begin_subtest "starts-with, no prefix, all messages"
 340 notmuch search --query=sexp '(starts-with "")' | notmuch_search_sanitize > OUTPUT
 341 notmuch search '*' | notmuch_search_sanitize > EXPECTED
 342 test_expect_equal_file EXPECTED OUTPUT
 343
 344 test_begin_subtest "starts-with, attachment"
 345 output=$(notmuch search --query=sexp '(attachment (starts-with not))' | notmuch_search_sanitize)
 346 test_expect_equal "$output" 'thread:XXX   2009-11-18 [2/2] Lars Kellogg-Stedman; [notmuch] "notmuch help" outputs to stderr? (attachment inbox signed unread)'
 347
 348 test_begin_subtest "starts-with, folder"
 349 notmuch search --output=files --query=sexp '(folder (starts-with bad))' | notmuch_dir_sanitize | sed 's/[0-9]*$/XXX/' > OUTPUT
 350 cat <<EOF > EXPECTED
 351 MAIL_DIR/bad/msg-XXX
 352 MAIL_DIR/bad/news/msg-XXX
 353 MAIL_DIR/duplicate/bad/news/msg-XXX
 354 EOF
 355 test_expect_equal_file EXPECTED OUTPUT
 356
 357 test_begin_subtest "starts-with, from"
 358 notmuch search --query=sexp '(from (starts-with Mik))' | notmuch_search_sanitize > OUTPUT
 359 cat <<EOF > EXPECTED
 360 thread:XXX   2009-11-17 [1/1] Mikhail Gusarov; [notmuch] [PATCH] Handle rename of message file (inbox unread)
 361 thread:XXX   2009-11-17 [2/7] Mikhail Gusarov| Lars Kellogg-Stedman, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
 362 thread:XXX   2009-11-17 [2/5] Mikhail Gusarov| Carl Worth, Keith Packard; [notmuch] [PATCH 2/2] Include <stdint.h> to get uint32_t in C++ file with gcc 4.4 (inbox unread)
 363 EOF
 364 test_expect_equal_file EXPECTED OUTPUT
 365
 366 test_begin_subtest "starts-with, id"
 367 notmuch search --query=sexp --output=messages '(id (starts-with 877))' > OUTPUT
 368 cat <<EOF > EXPECTED
 369 id:877h1wv7mg.fsf@inf-8657.int-evry.fr
 370 id:877htoqdbo.fsf@yoom.home.cworth.org
 371 EOF
 372 test_expect_equal_file EXPECTED OUTPUT
 373
 374 test_begin_subtest "starts-with, is"
 375 output=$(notmuch search --query=sexp '(is (starts-with searchby))' | notmuch_search_sanitize)
 376 test_expect_equal "$output" 'thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)'
 377
 378 test_begin_subtest "starts-with, mid"
 379 notmuch search --query=sexp --output=messages '(mid (starts-with 877))' > OUTPUT
 380 cat <<EOF > EXPECTED
 381 id:877h1wv7mg.fsf@inf-8657.int-evry.fr
 382 id:877htoqdbo.fsf@yoom.home.cworth.org
 383 EOF
 384 test_expect_equal_file EXPECTED OUTPUT
 385
 386 test_begin_subtest "starts-with, mimetype"
 387 notmuch search --query=sexp '(mimetype (starts-with sig))' | notmuch_search_sanitize > OUTPUT
 388 cat <<EOF > EXPECTED
 389 thread:XXX   2009-11-18 [2/2] Lars Kellogg-Stedman; [notmuch] "notmuch help" outputs to stderr? (attachment inbox signed unread)
 390 thread:XXX   2009-11-18 [4/7] Lars Kellogg-Stedman, Mikhail Gusarov| Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
 391 thread:XXX   2009-11-17 [1/3] Adrian Perez de Castro| Keith Packard, Carl Worth; [notmuch] Introducing myself (inbox signed unread)
 392 EOF
 393 test_expect_equal_file EXPECTED OUTPUT
 394
 395 add_message '[subject]="message with properties"'
 396 notmuch restore <<EOF
 397 #= ${gen_msg_id} foo=bar
 398 EOF
 399
 400 test_begin_subtest "starts-with, property"
 401 notmuch search --query=sexp '(property (starts-with foo=))' | notmuch_search_sanitize > OUTPUT
 402 cat <<EOF > EXPECTED
 403 thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; message with properties (inbox unread)
 404 EOF
 405 test_expect_equal_file EXPECTED OUTPUT
 406
 407 test_begin_subtest "starts-with, subject"
 408 notmuch search --query=sexp '(subject (starts-with FreeB))' | notmuch_search_sanitize > OUTPUT
 409 cat <<EOF > EXPECTED
 410 thread:XXX   2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)
 411 EOF
 412 test_expect_equal_file EXPECTED OUTPUT
 413
 414 test_begin_subtest "starts-with, tag"
 415 output=$(notmuch search --query=sexp '(tag (starts-with searchby))' | notmuch_search_sanitize)
 416 test_expect_equal "$output" 'thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)'
 417
 418 add_message '[subject]="no tags"'
 419 notag_mid=${gen_msg_id}
 420 notmuch tag -unread -inbox id:${notag_mid}
 421
 422 test_begin_subtest "negated starts-with, tag"
 423 output=$(notmuch search --query=sexp '(tag (not (starts-with in)))' | notmuch_search_sanitize)
 424 test_expect_equal "$output" 'thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
 425
 426 test_begin_subtest "negated starts-with, tag 2"
 427 output=$(notmuch search --query=sexp '(not (tag (starts-with in)))' | notmuch_search_sanitize)
 428 test_expect_equal "$output" 'thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
 429
 430 test_begin_subtest "negated starts-with, tag 3"
 431 output=$(notmuch search --query=sexp '(not (tag (starts-with "")))' | notmuch_search_sanitize)
 432 test_expect_equal "$output" 'thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
 433
 434 test_begin_subtest "starts-with, thread"
 435 notmuch search --query=sexp '(thread (starts-with "00"))' > OUTPUT
 436 notmuch search '*' > EXPECTED
 437 test_expect_equal_file EXPECTED OUTPUT
 438
 439 test_begin_subtest "starts-with, to"
 440 notmuch search --query=sexp '(to (starts-with "search"))' | notmuch_search_sanitize > OUTPUT
 441 cat <<EOF > EXPECTED
 442 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (inbox unread)
 443 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (address) (inbox unread)
 444 thread:XXX   2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)
 445 EOF
 446 test_expect_equal_file EXPECTED OUTPUT
 447
 448 test_begin_subtest "wildcard search for 'is'"
 449 notmuch search not id:${notag_mid} > EXPECTED
 450 notmuch search --query=sexp '(is *)' > OUTPUT
 451 test_expect_equal_file EXPECTED OUTPUT
 452
 453 test_begin_subtest "negated wildcard search for 'is'"
 454 notmuch search id:${notag_mid} > EXPECTED
 455 notmuch search --query=sexp '(not (is *))' > OUTPUT
 456 test_expect_equal_file EXPECTED OUTPUT
 457
 458 test_begin_subtest "wildcard search for 'property'"
 459 notmuch search property:foo=bar > EXPECTED
 460 notmuch search --query=sexp '(property *)' > OUTPUT
 461 test_expect_equal_file EXPECTED OUTPUT
 462
 463 test_begin_subtest "wildcard search for 'tag'"
 464 notmuch search not id:${notag_mid} > EXPECTED
 465 notmuch search --query=sexp '(tag *)' > OUTPUT
 466 test_expect_equal_file EXPECTED OUTPUT
 467
 468 test_begin_subtest "negated wildcard search for 'tag'"
 469 notmuch search id:${notag_mid} > EXPECTED
 470 notmuch search --query=sexp '(not (tag *))' > OUTPUT
 471 test_expect_equal_file EXPECTED OUTPUT
 472
 473 add_message '[subject]="message with tag \"*\""'
 474 notmuch tag '+*' id:${gen_msg_id}
 475
 476 test_begin_subtest "search for 'tag' \"*\""
 477 output=$(notmuch search --query=sexp --output=messages '(tag "*")')
 478 test_expect_equal "$output" "id:$gen_msg_id"
 479
 480 test_begin_subtest "search for missing / empty to"
 481 add_message [to]="undisclosed-recipients:"
 482 notmuch search --query=sexp '(not (to *))' | notmuch_search_sanitize > OUTPUT
 483 cat <<EOF > EXPECTED
 484 thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; search for missing / empty to (inbox unread)
 485 EOF
 486 test_expect_equal_file EXPECTED OUTPUT
 487
 488 test_begin_subtest "Unbalanced parens"
 489 # A code 1 indicates the error was handled (a crash will return e.g. 139).
 490 test_expect_code 1 "notmuch search --query=sexp '('"
 491
 492 test_begin_subtest "Unbalanced parens, error message"
 493 notmuch search --query=sexp '(' >OUTPUT 2>&1
 494 cat <<EOF > EXPECTED
 495 notmuch search: Syntax error in query
 496 invalid s-expression: '('
 497 EOF
 498 test_expect_equal_file EXPECTED OUTPUT
 499
 500 test_begin_subtest "unknown prefix"
 501 notmuch search --query=sexp '(foo)' >OUTPUT 2>&1
 502 cat <<EOF > EXPECTED
 503 notmuch search: Syntax error in query
 504 unknown prefix 'foo'
 505 EOF
 506 test_expect_equal_file EXPECTED OUTPUT
 507
 508 test_begin_subtest "list as prefix"
 509 notmuch search --query=sexp '((foo))' >OUTPUT 2>&1
 510 cat <<EOF > EXPECTED
 511 notmuch search: Syntax error in query
 512 unexpected list in field/operation position
 513 EOF
 514 test_expect_equal_file EXPECTED OUTPUT
 515
 516 test_begin_subtest "illegal nesting"
 517 notmuch search --query=sexp '(subject (subject foo))' >OUTPUT 2>&1
 518 cat <<EOF > EXPECTED
 519 notmuch search: Syntax error in query
 520 nested field: 'subject' inside 'subject'
 521 EOF
 522 test_expect_equal_file EXPECTED OUTPUT
 523
 524 test_begin_subtest "starts-with, no argument"
 525 notmuch search --query=sexp '(starts-with)' >OUTPUT 2>&1
 526 cat <<EOF > EXPECTED
 527 notmuch search: Syntax error in query
 528 'starts-with' expects single atom as argument
 529 EOF
 530 test_expect_equal_file EXPECTED OUTPUT
 531
 532 test_begin_subtest "starts-with, list argument"
 533 notmuch search --query=sexp '(starts-with (stuff))' >OUTPUT 2>&1
 534 cat <<EOF > EXPECTED
 535 notmuch search: Syntax error in query
 536 'starts-with' expects single atom as argument
 537 EOF
 538 test_expect_equal_file EXPECTED OUTPUT
 539
 540 test_begin_subtest "starts-with, too many arguments"
 541 notmuch search --query=sexp '(starts-with a b c)' >OUTPUT 2>&1
 542 cat <<EOF > EXPECTED
 543 notmuch search: Syntax error in query
 544 'starts-with' expects single atom as argument
 545 EOF
 546 test_expect_equal_file EXPECTED OUTPUT
 547
 548 test_begin_subtest "starts-with, illegal field"
 549 notmuch search --query=sexp '(body (starts-with foo))' >OUTPUT 2>&1
 550 cat <<EOF > EXPECTED
 551 notmuch search: Syntax error in query
 552 'body' does not support wildcard queries
 553 EOF
 554 test_expect_equal_file EXPECTED OUTPUT
 555
 556 test_begin_subtest "wildcard, illegal field"
 557 notmuch search --query=sexp '(body *)' >OUTPUT 2>&1
 558 cat <<EOF > EXPECTED
 559 notmuch search: Syntax error in query
 560 'body' does not support wildcard queries
 561 EOF
 562 test_expect_equal_file EXPECTED OUTPUT
 563
 564 test_begin_subtest "Search, exclude \"deleted\" messages from search"
 565 notmuch config set search.exclude_tags deleted
 566 generate_message '[subject]="Not deleted"'
 567 not_deleted_id=$gen_msg_id
 568 generate_message '[subject]="Deleted"'
 569 notmuch new > /dev/null
 570 notmuch tag +deleted id:$gen_msg_id
 571 deleted_id=$gen_msg_id
 572 output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
 573 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)"
 574
 575 test_begin_subtest "Search, exclude \"deleted\" messages from message search --exclude=false"
 576 output=$(notmuch search --query=sexp --exclude=false --output=messages '(subject deleted)' | notmuch_search_sanitize)
 577 test_expect_equal "$output" "id:$not_deleted_id
 578 id:$deleted_id"
 579
 580 test_begin_subtest "Search, exclude \"deleted\" messages from search, overridden"
 581 notmuch search --query=sexp '(and (subject deleted) (tag deleted))' | notmuch_search_sanitize > OUTPUT
 582 cat <<EOF > EXPECTED
 583 thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Deleted (deleted inbox unread)
 584 EOF
 585 test_expect_equal_file EXPECTED OUTPUT
 586
 587 test_begin_subtest "Search, exclude \"deleted\" messages from threads"
 588 add_message '[subject]="Not deleted reply"' '[in-reply-to]="<$gen_msg_id>"'
 589 output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
 590 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
 591 thread:XXX   2001-01-05 [1/2] Notmuch Test Suite; Not deleted reply (deleted inbox unread)"
 592
 593 test_begin_subtest "Search, don't exclude \"deleted\" messages when --exclude=flag specified"
 594 output=$(notmuch search --query=sexp --exclude=flag '(subject deleted)' | notmuch_search_sanitize)
 595 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
 596 thread:XXX   2001-01-05 [1/2] Notmuch Test Suite; Deleted (deleted inbox unread)"
 597
 598 test_begin_subtest "Search, don't exclude \"deleted\" messages from search if not configured"
 599 notmuch config set search.exclude_tags
 600 output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
 601 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
 602 thread:XXX   2001-01-05 [2/2] Notmuch Test Suite; Deleted (deleted inbox unread)"
 603
 604 test_begin_subtest "regex at top level"
 605 notmuch search --query=sexp '(rx foo)' >& OUTPUT
 606 cat <<EOF > EXPECTED
 607 notmuch search: Syntax error in query
 608 illegal 'rx' outside field
 609 EOF
 610 test_expect_equal_file EXPECTED OUTPUT
 611
 612 test_begin_subtest "regex in illegal field"
 613 notmuch search --query=sexp '(body (regex foo))' >& OUTPUT
 614 cat <<EOF > EXPECTED
 615 notmuch search: Syntax error in query
 616 'regex' not supported in field 'body'
 617 EOF
 618 test_expect_equal_file EXPECTED OUTPUT
 619
 620 notmuch search --output=messages from:cworth > cworth.msg-ids
 621
 622 test_begin_subtest "regexp 'from' search"
 623 notmuch search --output=messages --query=sexp '(from (rx cworth))' > OUTPUT
 624 test_expect_equal_file cworth.msg-ids OUTPUT
 625
 626 test_begin_subtest "regexp search for 'from' 2"
 627 notmuch search from:/cworth@cworth.org/ and subject:patch | notmuch_search_sanitize > EXPECTED
 628 notmuch search --query=sexp '(and (from (rx cworth@cworth.org)) (subject patch))' \
 629     | notmuch_search_sanitize > OUTPUT
 630 test_expect_equal_file EXPECTED OUTPUT
 631
 632 test_begin_subtest "regexp 'folder' search"
 633 notmuch search 'folder:/^bar$/' | notmuch_search_sanitize > EXPECTED
 634 notmuch search --query=sexp '(folder (rx ^bar$))' | notmuch_search_sanitize > OUTPUT
 635 test_expect_equal_file EXPECTED OUTPUT
 636
 637 test_begin_subtest "regexp 'id' search"
 638 notmuch search --output=messages --query=sexp '(id (rx yoom))' > OUTPUT
 639 test_expect_equal_file cworth.msg-ids OUTPUT
 640
 641 test_begin_subtest "unanchored 'is' search"
 642 notmuch search tag:signed or tag:inbox > EXPECTED
 643 notmuch search --query=sexp '(is (rx i))' > OUTPUT
 644 test_expect_equal_file EXPECTED OUTPUT
 645
 646 test_begin_subtest "anchored 'is' search"
 647 notmuch search tag:signed > EXPECTED
 648 notmuch search --query=sexp '(is (rx ^si))' > OUTPUT
 649 test_expect_equal_file EXPECTED OUTPUT
 650
 651 test_begin_subtest "combine regexp mid and subject"
 652 notmuch search subject:/-C/ and mid:/y..m/ | notmuch_search_sanitize > EXPECTED
 653 notmuch search --query=sexp '(and (subject (rx -C)) (mid (rx y..m)))' | notmuch_search_sanitize > OUTPUT
 654 test_expect_equal_file EXPECTED OUTPUT
 655
 656 test_begin_subtest "regexp 'path' search"
 657 notmuch search 'path:/^bar$/' | notmuch_search_sanitize > EXPECTED
 658 notmuch search --query=sexp '(path (rx ^bar$))' | notmuch_search_sanitize > OUTPUT
 659 test_expect_equal_file EXPECTED OUTPUT
 660
 661 test_begin_subtest "regexp 'property' search"
 662 notmuch search property:foo=bar > EXPECTED
 663 notmuch search --query=sexp '(property (rx foo=.*))' > OUTPUT
 664 test_expect_equal_file EXPECTED OUTPUT
 665
 666 test_begin_subtest "anchored 'tag' search"
 667 notmuch search tag:signed > EXPECTED
 668 notmuch search --query=sexp '(tag (rx ^si))' > OUTPUT
 669 test_expect_equal_file EXPECTED OUTPUT
 670
 671 test_begin_subtest "regexp 'thread' search"
 672 notmuch search --output=threads '*' | grep '7$' > EXPECTED
 673 notmuch search --output=threads --query=sexp '(thread (rx 7$))' > OUTPUT
 674 test_expect_equal_file EXPECTED OUTPUT
 675
 676 test_begin_subtest "Basic query that matches no messages"
 677 count=$(notmuch count from:keithp and to:keithp)
 678 test_expect_equal 0 "$count"
 679
 680 test_begin_subtest "Same query against threads"
 681 notmuch search --query=sexp '(and (thread (of (from keithp))) (thread (matching (to keithp))))' \
 682     | notmuch_search_sanitize > OUTPUT
 683 cat<<EOF > EXPECTED
 684 thread:XXX   2009-11-18 [7/7] Lars Kellogg-Stedman, Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
 685 EOF
 686 test_expect_equal_file EXPECTED OUTPUT
 687
 688 test_begin_subtest "Mix thread and non-threads query"
 689 notmuch search --query=sexp '(and (thread (matching keithp)) (to keithp))' | notmuch_search_sanitize > OUTPUT
 690 cat<<EOF > EXPECTED
 691 thread:XXX   2009-11-18 [1/7] Lars Kellogg-Stedman| Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
 692 EOF
 693 test_expect_equal_file EXPECTED OUTPUT
 694
 695 test_begin_subtest "Compound subquery"
 696 notmuch search --query=sexp '(thread (of (from keithp) (subject Maildir)))' | notmuch_search_sanitize > OUTPUT
 697 cat<<EOF > EXPECTED
 698 thread:XXX   2009-11-18 [7/7] Lars Kellogg-Stedman, Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
 699 EOF
 700 test_expect_equal_file EXPECTED OUTPUT
 701
 702 test_begin_subtest "empty subquery"
 703 notmuch search --query=sexp '(thread (of))' 1>OUTPUT 2>&1
 704 notmuch search '*' > EXPECTED
 705 test_expect_equal_file EXPECTED OUTPUT
 706
 707 test_begin_subtest "illegal expansion"
 708 notmuch search --query=sexp '(id (of ego))' 1>OUTPUT 2>&1
 709 cat<<EOF > EXPECTED
 710 notmuch search: Syntax error in query
 711 'of' unsupported inside 'id'
 712 EOF
 713 test_expect_equal_file EXPECTED OUTPUT
 714
 715 test_begin_subtest "(folder (of subquery))"
 716 notmuch search --query=sexp --output=messages '(folder (of (id yun3a4cegoa.fsf@aiko.keithp.com)))' > OUTPUT
 717 cat <<EOF > EXPECTED
 718 id:yun1vjwegii.fsf@aiko.keithp.com
 719 id:yun3a4cegoa.fsf@aiko.keithp.com
 720 id:1258509400-32511-1-git-send-email-stewart@flamingspork.com
 721 id:1258506353-20352-1-git-send-email-stewart@flamingspork.com
 722 id:20091118010116.GC25380@dottiness.seas.harvard.edu
 723 id:20091118005829.GB25380@dottiness.seas.harvard.edu
 724 id:cf0c4d610911171136h1713aa59w9cf9aa31f052ad0a@mail.gmail.com
 725 EOF
 726 test_expect_equal_file EXPECTED OUTPUT
 727
 728 test_begin_subtest "infix query"
 729 notmuch search to:searchbyto | notmuch_search_sanitize > EXPECTED
 730 notmuch search --query=sexp '(infix "to:searchbyto")' |  notmuch_search_sanitize > OUTPUT
 731 test_expect_equal_file EXPECTED OUTPUT
 732
 733 test_begin_subtest "bad infix query 1"
 734 notmuch search --query=sexp '(infix "from:/unbalanced")' 2>&1|  notmuch_search_sanitize > OUTPUT
 735 cat <<EOF > EXPECTED
 736 notmuch search: Syntax error in query
 737 Syntax error in infix query: from:/unbalanced
 738 EOF
 739 test_expect_equal_file EXPECTED OUTPUT
 740
 741 test_begin_subtest "bad infix query 2"
 742 notmuch search --query=sexp '(infix "thread:{unbalanced")' 2>&1|  notmuch_search_sanitize > OUTPUT
 743 cat <<EOF > EXPECTED
 744 notmuch search: Syntax error in query
 745 Syntax error in infix query: thread:{unbalanced
 746 EOF
 747 test_expect_equal_file EXPECTED OUTPUT
 748
 749 test_begin_subtest "bad infix query 3: bad nesting"
 750 notmuch search --query=sexp '(subject (infix "tag:inbox"))' 2>&1|  notmuch_search_sanitize > OUTPUT
 751 cat <<EOF > EXPECTED
 752 notmuch search: Syntax error in query
 753 'infix' not supported inside 'subject'
 754 EOF
 755 test_expect_equal_file EXPECTED OUTPUT
 756
 757 test_begin_subtest "infix query that matches no messages"
 758 notmuch search --query=sexp '(and (infix "from:keithp") (infix "to:keithp"))' > OUTPUT
 759 test_expect_equal_file /dev/null OUTPUT
 760
 761 test_begin_subtest "compound infix query"
 762 notmuch search date:2009-11-18..2009-11-18 and tag:unread > EXPECTED
 763 notmuch search --query=sexp  '(infix "date:2009-11-18..2009-11-18 and tag:unread")' > OUTPUT
 764 test_expect_equal_file EXPECTED OUTPUT
 765
 766 test_begin_subtest "compound infix query 2"
 767 notmuch search date:2009-11-18..2009-11-18 and tag:unread > EXPECTED
 768 notmuch search --query=sexp  '(and (infix "date:2009-11-18..2009-11-18") (infix "tag:unread"))' > OUTPUT
 769 test_expect_equal_file EXPECTED OUTPUT
 770
 771 test_begin_subtest "user header (unknown header)"
 772 notmuch search --query=sexp '(FooBar)' >& OUTPUT
 773 cat <<EOF > EXPECTED
 774 notmuch search: Syntax error in query
 775 unknown prefix 'FooBar'
 776 EOF
 777 test_expect_equal_file EXPECTED OUTPUT
 778
 779 test_begin_subtest "adding user header"
 780 test_expect_code 0 "notmuch config set index.header.List \"List-Id\""
 781
 782 test_begin_subtest "reindexing"
 783 test_expect_code 0 'notmuch reindex "*"'
 784
 785 test_begin_subtest "wildcard search for user header"
 786 grep -Ril List-Id ${MAIL_DIR} | sort | notmuch_dir_sanitize > EXPECTED
 787 notmuch search --output=files --query=sexp '(List *)' | sort | notmuch_dir_sanitize > OUTPUT
 788 test_expect_equal_file EXPECTED OUTPUT
 789
 790 test_begin_subtest "wildcard search for user header 2"
 791 grep -Ril List-Id ${MAIL_DIR} | sort | notmuch_dir_sanitize > EXPECTED
 792 notmuch search --output=files --query=sexp '(List (starts-with not))' | sort | notmuch_dir_sanitize > OUTPUT
 793 test_expect_equal_file EXPECTED OUTPUT
 794
 795 test_begin_subtest "search for user header"
 796 notmuch search List:notmuch | notmuch_search_sanitize > EXPECTED
 797 notmuch search --query=sexp '(List notmuch)' | notmuch_search_sanitize > OUTPUT
 798 test_expect_equal_file EXPECTED OUTPUT
 799
 800 test_begin_subtest "search for user header (list token)"
 801 notmuch search List:notmuch | notmuch_search_sanitize > EXPECTED
 802 notmuch search --query=sexp '(List notmuch.notmuchmail.org)' | notmuch_search_sanitize > OUTPUT
 803 test_expect_equal_file EXPECTED OUTPUT
 804
 805 test_begin_subtest "search for user header (quoted string)"
 806 notmuch search 'List:"notmuch notmuchmail org"' | notmuch_search_sanitize > EXPECTED
 807 notmuch search --query=sexp '(List "notmuch notmuchmail org")' | notmuch_search_sanitize > OUTPUT
 808 test_expect_equal_file EXPECTED OUTPUT
 809
 810 test_begin_subtest "search for user header (atoms)"
 811 notmuch search 'List:"notmuch notmuchmail org"' | notmuch_search_sanitize > EXPECTED
 812 notmuch search --query=sexp '(List notmuch notmuchmail org)' | notmuch_search_sanitize > OUTPUT
 813 test_expect_equal_file EXPECTED OUTPUT
 814
 815 test_done