mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 04:18:08 +01:00
606d9b02e4
Test the relatively trivial logic changes for the sexp query parser first before refactoring that logic to share with the infix query parser.
1322 lines
60 KiB
Bash
Executable file
1322 lines
60 KiB
Bash
Executable file
#!/usr/bin/env bash
|
|
test_description='"notmuch search" in several variations'
|
|
. $(dirname "$0")/test-lib.sh || exit 1
|
|
|
|
if [ $NOTMUCH_HAVE_SFSEXP -ne 1 ]; then
|
|
printf "Skipping due to missing sfsexp library\n"
|
|
test_done
|
|
fi
|
|
|
|
add_email_corpus
|
|
|
|
for query in '()' '(not)' '(and)' '(or ())' '(or (not))' '(or (and))' \
|
|
'(or (and) (or) (not (and)))'; do
|
|
test_begin_subtest "all messages: $query"
|
|
notmuch search '*' > EXPECTED
|
|
notmuch search --query=sexp "$query" > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
done
|
|
|
|
for query in '(or)' '(not ())' '(not (not))' '(not (and))' \
|
|
'(not (or (and) (or) (not (and))))'; do
|
|
test_begin_subtest "no messages: $query"
|
|
notmuch search --query=sexp "$query" > OUTPUT
|
|
test_expect_equal_file /dev/null OUTPUT
|
|
done
|
|
|
|
test_begin_subtest "and of exact terms"
|
|
notmuch search --query=sexp '(and "wonderful" "wizard")' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "and of stemmed terms"
|
|
notmuch search --query=sexp '(and wonderful wizard)' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "or of exact terms"
|
|
notmuch search --query=sexp '(or "php" "wizard")' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2010-12-29 [1/1] François Boulogne; [aur-general] Guidelines: cp, mkdir vs install (inbox unread)
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "or of exact terms via field processor"
|
|
notmuch search 'sexp:"(or ""php"" ""wizard"")"' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2010-12-29 [1/1] François Boulogne; [aur-general] Guidelines: cp, mkdir vs install (inbox unread)
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "single term in body"
|
|
notmuch search --query=sexp 'wizard' | notmuch_search_sanitize>OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "single term in body (case insensitive)"
|
|
notmuch search --query=sexp 'Wizard' | notmuch_search_sanitize>OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [1/3] Carl Worth| Jan Janak; [notmuch] What a great idea! (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "single term in body, stemmed version"
|
|
notmuch search arriv > EXPECTED
|
|
notmuch search --query=sexp arriv > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "single term in body, unstemmed version"
|
|
notmuch search --query=sexp '"arriv"' > OUTPUT
|
|
test_expect_equal_file /dev/null OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject'"
|
|
add_message [subject]=subjectsearchtest '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp '(subject subjectsearchtest)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'subject' (case insensitive)"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(subject "Maildir")' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8):"
|
|
add_message [subject]=utf8-sübjéct '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp '(subject utf8 sübjéct)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, and):"
|
|
output=$(notmuch search --query=sexp '(subject (and utf8 sübjéct))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, and outside):"
|
|
output=$(notmuch search --query=sexp '(and (subject utf8) (subject sübjéct))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, or):"
|
|
notmuch search --query=sexp '(subject (or utf8 subjectsearchtest))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, or outside):"
|
|
notmuch search --query=sexp '(or (subject utf8) (subject subjectsearchtest))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; subjectsearchtest (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'attachment'"
|
|
notmuch search attachment:notmuch-help.patch > EXPECTED
|
|
notmuch search --query=sexp '(attachment notmuch-help.patch)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'body'"
|
|
add_message '[subject]="body search"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [body]=bodysearchtest
|
|
output=$(notmuch search --query=sexp '(body bodysearchtest)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; body search (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'body' (phrase)"
|
|
add_message '[subject]="body search (phrase)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="body search (phrase)"'
|
|
add_message '[subject]="negative result"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="This phrase should not match the body search"'
|
|
output=$(notmuch search --query=sexp '(body "body search phrase")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; body search (phrase) (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'body' (utf-8):"
|
|
add_message '[subject]="utf8-message-body-subject"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[body]="message body utf8: bödý"'
|
|
output=$(notmuch search --query=sexp '(body bödý)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-message-body-subject (inbox unread)"
|
|
|
|
add_message "[body]=thebody-1" "[subject]=kryptonite-1"
|
|
add_message "[body]=nothing-to-see-here-1" "[subject]=thebody-1"
|
|
|
|
test_begin_subtest 'search without body: prefix'
|
|
notmuch search thebody > EXPECTED
|
|
notmuch search --query=sexp '(and thebody)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest 'negated body: prefix'
|
|
notmuch search thebody and not body:thebody > EXPECTED
|
|
notmuch search --query=sexp '(and (not (body thebody)) thebody)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest 'search unprefixed for prefixed term'
|
|
notmuch search kryptonite > EXPECTED
|
|
notmuch search --query=sexp '(and kryptonite)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest 'search with body: prefix for term only in subject'
|
|
notmuch search body:kryptonite > EXPECTED
|
|
notmuch search --query=sexp '(body kryptonite)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'from'"
|
|
add_message '[subject]="search by from"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [from]=searchbyfrom
|
|
output=$(notmuch search --query=sexp '(from searchbyfrom)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] searchbyfrom; search by from (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'from' (address)"
|
|
add_message '[subject]="search by from (address)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [from]=searchbyfrom@example.com
|
|
output=$(notmuch search --query=sexp '(from searchbyfrom@example.com)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] searchbyfrom@example.com; search by from (address) (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'from' (name)"
|
|
add_message '[subject]="search by from (name)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[from]="Search By From Name <test@example.com>"'
|
|
output=$(notmuch search --query=sexp '(from "Search By From Name")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Search By From Name; search by from (name) (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'from' (name and address)"
|
|
output=$(notmuch search --query=sexp '(from "Search By From Name <test@example.com>")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Search By From Name; search by from (name) (inbox unread)"
|
|
|
|
add_message '[dir]=bad' '[subject]="To the bone"'
|
|
add_message '[dir]=.' '[subject]="Top level"'
|
|
add_message '[dir]=bad/news' '[subject]="Bears"'
|
|
mkdir -p "${MAIL_DIR}/duplicate/bad/news"
|
|
cp "$gen_msg_filename" "${MAIL_DIR}/duplicate/bad/news"
|
|
|
|
add_message '[dir]=things' '[subject]="These are a few"'
|
|
add_message '[dir]=things/favorite' '[subject]="Raindrops, whiskers, kettles"'
|
|
add_message '[dir]=things/bad' '[subject]="Bites, stings, sad feelings"'
|
|
|
|
test_begin_subtest "Search by 'folder' (multiple)"
|
|
output=$(notmuch search --query=sexp '(folder bad bad/news things/bad)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'folder': top level."
|
|
notmuch search folder:'""' > EXPECTED
|
|
notmuch search --query=sexp '(folder "")' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'folder' with --output=files"
|
|
output=$(notmuch search --output=files --query=sexp '(folder bad/news)' | notmuch_search_files_sanitize)
|
|
test_expect_equal "$output" "MAIL_DIR/bad/news/msg-XXX
|
|
MAIL_DIR/duplicate/bad/news/msg-XXX"
|
|
|
|
test_begin_subtest "Search by 'folder' with --output=files (trailing /)"
|
|
output=$(notmuch search --output=files --query=sexp '(folder bad/news/)' | notmuch_search_files_sanitize)
|
|
test_expect_equal "$output" "MAIL_DIR/bad/news/msg-XXX
|
|
MAIL_DIR/duplicate/bad/news/msg-XXX"
|
|
|
|
test_begin_subtest "Search by 'folder' (multiple)"
|
|
output=$(notmuch search --query=sexp '(folder bad bad/news things/bad)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'folder' (multiple, trailing /)"
|
|
output=$(notmuch search --query=sexp '(folder bad bad/news/ things/bad)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'path' with --output=files"
|
|
output=$(notmuch search --output=files --query=sexp '(path bad/news)' | notmuch_search_files_sanitize)
|
|
test_expect_equal "$output" "MAIL_DIR/bad/news/msg-XXX
|
|
MAIL_DIR/duplicate/bad/news/msg-XXX"
|
|
|
|
test_begin_subtest "Search by 'path' with --output=files (trailing /)"
|
|
output=$(notmuch search --output=files --query=sexp '(path bad/news/)' | notmuch_search_files_sanitize)
|
|
test_expect_equal "$output" "MAIL_DIR/bad/news/msg-XXX
|
|
MAIL_DIR/duplicate/bad/news/msg-XXX"
|
|
|
|
test_begin_subtest "Search by 'path' specification (multiple)"
|
|
output=$(notmuch search --query=sexp '(path bad bad/news things/bad)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'path' specification (multiple, trailing /)"
|
|
output=$(notmuch search --query=sexp '(path bad bad/news/ things/bad)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; To the bone (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1(2)] Notmuch Test Suite; Bears (inbox unread)
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Bites, stings, sad feelings (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'id'"
|
|
add_message '[subject]="search by id"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp "(id ${gen_msg_id})" | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by id (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'id' (or)"
|
|
add_message '[subject]="search by id"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp "(id non-existent-mid ${gen_msg_id})" | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by id (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'is' (multiple)"
|
|
notmuch tag -inbox tag:searchbytag
|
|
notmuch search is:inbox AND is:unread | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(is inbox unread)' | notmuch_search_sanitize > OUTPUT
|
|
notmuch tag +inbox tag:searchbytag
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'mid'"
|
|
add_message '[subject]="search by mid"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp "(mid ${gen_msg_id})" | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by mid (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'mid' (or)"
|
|
add_message '[subject]="search by mid"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
output=$(notmuch search --query=sexp "(mid non-existent-mid ${gen_msg_id})" | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by mid (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'mimetype'"
|
|
notmuch search mimetype:text/html > EXPECTED
|
|
notmuch search --query=sexp '(mimetype text html)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
QUERYSTR="date:2009-11-18..2009-11-18 and tag:unread"
|
|
QUERYSTR2="query:test and subject:Maildir"
|
|
notmuch config set --database query.test "$QUERYSTR"
|
|
notmuch config set query.test2 "$QUERYSTR2"
|
|
|
|
test_begin_subtest "ill-formed named query search"
|
|
notmuch search --query=sexp '(query)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'query' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "ill-formed named query search 2"
|
|
notmuch search --query=sexp '(to (query))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'query' not supported inside 'to'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search named query"
|
|
notmuch search --query=sexp '(query test)' > OUTPUT
|
|
notmuch search $QUERYSTR > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, phrase-token):"
|
|
output=$(notmuch search --query=sexp '(subject utf8-sübjéct)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
|
|
|
|
test_begin_subtest "search named query with other terms"
|
|
notmuch search --query=sexp '(and (query test) (subject Maildir))' > OUTPUT
|
|
notmuch search $QUERYSTR and subject:Maildir > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search nested named query"
|
|
notmuch search --query=sexp '(query test2)' > OUTPUT
|
|
notmuch search $QUERYSTR2 > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject' (utf-8, quoted string):"
|
|
output=$(notmuch search --query=sexp '(subject "utf8 sübjéct")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'subject' (combine phrase, term):"
|
|
output=$(notmuch search --query=sexp '(subject Mac "compatibility issues")' | notmuch_search_sanitize)
|
|
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)"
|
|
|
|
test_begin_subtest "Search by 'subject' (combine phrase, term 2):"
|
|
notmuch search --query=sexp '(subject (or utf8 "compatibility issues"))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [4/4] Jjgod Jiang, Alexander Botero-Lowry; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-sübjéct (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; utf8-message-body-subject (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'subject' (combine phrase, term 3):"
|
|
notmuch search --query=sexp '(subject issues X/Darwin)' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [4/4] Jjgod Jiang, Alexander Botero-Lowry; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'tag'"
|
|
add_message '[subject]="search by tag"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
notmuch tag +searchbytag id:${gen_msg_id}
|
|
output=$(notmuch search --query=sexp '(tag searchbytag)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)"
|
|
|
|
test_begin_subtest "Search by 'tag' (multiple)"
|
|
notmuch tag -inbox tag:searchbytag
|
|
notmuch search tag:inbox AND tag:unread | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(tag inbox unread)' | notmuch_search_sanitize > OUTPUT
|
|
notmuch tag +inbox tag:searchbytag
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'tag' and 'subject'"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (tag inbox) (subject maildir))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search by 'thread'"
|
|
add_message '[subject]="search by thread"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"'
|
|
thread_id=$(notmuch search id:${gen_msg_id} | sed -e "s/thread:\([a-f0-9]*\).*/\1/")
|
|
output=$(notmuch search --query=sexp "(thread ${thread_id})" | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by thread (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'to'"
|
|
add_message '[subject]="search by to"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [to]=searchbyto
|
|
output=$(notmuch search --query=sexp '(to searchbyto)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'to' (address)"
|
|
add_message '[subject]="search by to (address)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' [to]=searchbyto@example.com
|
|
output=$(notmuch search --query=sexp '(to searchbyto@example.com)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (address) (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'to' (name)"
|
|
add_message '[subject]="search by to (name)"' '[date]="Sat, 01 Jan 2000 12:00:00 -0000"' '[to]="Search By To Name <test@example.com>"'
|
|
output=$(notmuch search --query=sexp '(to "Search By To Name")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)"
|
|
|
|
test_begin_subtest "Search by 'to' (name and address)"
|
|
output=$(notmuch search --query=sexp '(to "Search By To Name <test@example.com>")' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)"
|
|
|
|
test_begin_subtest "starts-with, no prefix"
|
|
output=$(notmuch search --query=sexp '(starts-with prelim)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)"
|
|
|
|
test_begin_subtest "starts-with, case-insensitive"
|
|
notmuch search --query=sexp '(starts-with FreeB)' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [3/4] Alexander Botero-Lowry, Jjgod Jiang; [notmuch] Mac OS X/Darwin compatibility issues (inbox unread)
|
|
thread:XXX 2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, no prefix, all messages"
|
|
notmuch search --query=sexp '(starts-with "")' | notmuch_search_sanitize > OUTPUT
|
|
notmuch search '*' | notmuch_search_sanitize > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, attachment"
|
|
output=$(notmuch search --query=sexp '(attachment (starts-with not))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2009-11-18 [2/2] Lars Kellogg-Stedman; [notmuch] "notmuch help" outputs to stderr? (attachment inbox signed unread)'
|
|
|
|
test_begin_subtest "starts-with, folder"
|
|
notmuch search --output=files --query=sexp '(folder (starts-with bad))' | notmuch_search_files_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
MAIL_DIR/bad/msg-XXX
|
|
MAIL_DIR/bad/news/msg-XXX
|
|
MAIL_DIR/duplicate/bad/news/msg-XXX
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, from"
|
|
notmuch search --query=sexp '(from (starts-with Mik))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-17 [1/1] Mikhail Gusarov; [notmuch] [PATCH] Handle rename of message file (inbox unread)
|
|
thread:XXX 2009-11-17 [2/7] Mikhail Gusarov| Lars Kellogg-Stedman, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
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)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, id"
|
|
notmuch search --query=sexp --output=messages '(id (starts-with 877))' > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
id:877h1wv7mg.fsf@inf-8657.int-evry.fr
|
|
id:877htoqdbo.fsf@yoom.home.cworth.org
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, is"
|
|
output=$(notmuch search --query=sexp '(is (starts-with searchby))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)'
|
|
|
|
test_begin_subtest "starts-with, mid"
|
|
notmuch search --query=sexp --output=messages '(mid (starts-with 877))' > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
id:877h1wv7mg.fsf@inf-8657.int-evry.fr
|
|
id:877htoqdbo.fsf@yoom.home.cworth.org
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, mimetype"
|
|
notmuch search --query=sexp '(mimetype (starts-with sig))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [2/2] Lars Kellogg-Stedman; [notmuch] "notmuch help" outputs to stderr? (attachment inbox signed unread)
|
|
thread:XXX 2009-11-18 [4/7] Lars Kellogg-Stedman, Mikhail Gusarov| Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
thread:XXX 2009-11-17 [1/3] Adrian Perez de Castro| Keith Packard, Carl Worth; [notmuch] Introducing myself (inbox signed unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
add_message '[subject]="message with properties"'
|
|
notmuch restore <<EOF
|
|
#= ${gen_msg_id} foo=bar
|
|
EOF
|
|
|
|
test_begin_subtest "starts-with, property"
|
|
notmuch search --query=sexp '(property (starts-with foo=))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; message with properties (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, subject"
|
|
notmuch search --query=sexp '(subject (starts-with FreeB))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2009-11-17 [2/2] Alex Botero-Lowry, Carl Worth; [notmuch] preliminary FreeBSD support (attachment inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, tag"
|
|
output=$(notmuch search --query=sexp '(tag (starts-with searchby))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by tag (inbox searchbytag unread)'
|
|
|
|
add_message '[subject]="no tags"'
|
|
notag_mid=${gen_msg_id}
|
|
notmuch tag -unread -inbox id:${notag_mid}
|
|
|
|
test_begin_subtest "negated starts-with, tag"
|
|
output=$(notmuch search --query=sexp '(tag (not (starts-with in)))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
|
|
|
|
test_begin_subtest "negated starts-with, tag 2"
|
|
output=$(notmuch search --query=sexp '(not (tag (starts-with in)))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
|
|
|
|
test_begin_subtest "negated starts-with, tag 3"
|
|
output=$(notmuch search --query=sexp '(not (tag (starts-with "")))' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" 'thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; no tags ()'
|
|
|
|
test_begin_subtest "starts-with, thread"
|
|
notmuch search --query=sexp '(thread (starts-with "00"))' > OUTPUT
|
|
notmuch search '*' > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, to"
|
|
notmuch search --query=sexp '(to (starts-with "search"))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (address) (inbox unread)
|
|
thread:XXX 2000-01-01 [1/1] Notmuch Test Suite; search by to (name) (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard search for 'is'"
|
|
notmuch search not id:${notag_mid} > EXPECTED
|
|
notmuch search --query=sexp '(is *)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "negated wildcard search for 'is'"
|
|
notmuch search id:${notag_mid} > EXPECTED
|
|
notmuch search --query=sexp '(not (is *))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard search for 'property'"
|
|
notmuch search property:foo=bar > EXPECTED
|
|
notmuch search --query=sexp '(property *)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard search for 'tag'"
|
|
notmuch search not id:${notag_mid} > EXPECTED
|
|
notmuch search --query=sexp '(tag *)' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "negated wildcard search for 'tag'"
|
|
notmuch search id:${notag_mid} > EXPECTED
|
|
notmuch search --query=sexp '(not (tag *))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
add_message '[subject]="message with tag \"*\""'
|
|
notmuch tag '+*' id:${gen_msg_id}
|
|
|
|
test_begin_subtest "search for 'tag' \"*\""
|
|
output=$(notmuch search --query=sexp --output=messages '(tag "*")')
|
|
test_expect_equal "$output" "id:$gen_msg_id"
|
|
|
|
test_begin_subtest "search for missing / empty to"
|
|
add_message [to]="undisclosed-recipients:"
|
|
notmuch search --query=sexp '(not (to *))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; search for missing / empty to (inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Unbalanced parens"
|
|
# A code 1 indicates the error was handled (a crash will return e.g. 139).
|
|
test_expect_code 1 "notmuch search --query=sexp '('"
|
|
|
|
test_begin_subtest "Unbalanced parens, error message"
|
|
notmuch search --query=sexp '(' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
invalid s-expression: '('
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "unknown prefix"
|
|
notmuch search --query=sexp '(foo)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
unknown prefix 'foo'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "list as prefix"
|
|
notmuch search --query=sexp '((foo))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
unexpected list in field/operation position
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "illegal nesting"
|
|
notmuch search --query=sexp '(subject (subject foo))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'subject' inside 'subject'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, no argument"
|
|
notmuch search --query=sexp '(starts-with)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'starts-with' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, list argument"
|
|
notmuch search --query=sexp '(starts-with (stuff))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'starts-with' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, too many arguments"
|
|
notmuch search --query=sexp '(starts-with a b c)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'starts-with' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "starts-with, illegal field"
|
|
notmuch search --query=sexp '(body (starts-with foo))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'body' does not support wildcard queries
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard, illegal field"
|
|
notmuch search --query=sexp '(body *)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'body' does not support wildcard queries
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search, exclude \"deleted\" messages from search"
|
|
notmuch config set search.exclude_tags deleted
|
|
generate_message '[subject]="Not deleted"'
|
|
not_deleted_id=$gen_msg_id
|
|
generate_message '[subject]="Deleted"'
|
|
notmuch new > /dev/null
|
|
notmuch tag +deleted id:$gen_msg_id
|
|
deleted_id=$gen_msg_id
|
|
output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)"
|
|
|
|
test_begin_subtest "Search, exclude \"deleted\" messages from message search --exclude=false"
|
|
output=$(notmuch search --query=sexp --exclude=false --output=messages '(subject deleted)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "id:$not_deleted_id
|
|
id:$deleted_id"
|
|
|
|
test_begin_subtest "Search, exclude \"deleted\" messages from search, overridden"
|
|
notmuch search --query=sexp '(and (subject deleted) (tag deleted))' | notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Deleted (deleted inbox unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Search, exclude \"deleted\" messages from threads"
|
|
add_message '[subject]="Not deleted reply"' '[in-reply-to]="<$gen_msg_id>"'
|
|
output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
|
|
thread:XXX 2001-01-05 [1/2] Notmuch Test Suite; Not deleted reply (deleted inbox unread)"
|
|
|
|
test_begin_subtest "Search, don't exclude \"deleted\" messages when --exclude=flag specified"
|
|
output=$(notmuch search --query=sexp --exclude=flag '(subject deleted)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
|
|
thread:XXX 2001-01-05 [1/2] Notmuch Test Suite; Deleted (deleted inbox unread)"
|
|
|
|
test_begin_subtest "Search, don't exclude \"deleted\" messages from search if not configured"
|
|
notmuch config set search.exclude_tags
|
|
output=$(notmuch search --query=sexp '(subject deleted)' | notmuch_search_sanitize)
|
|
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Not deleted (inbox unread)
|
|
thread:XXX 2001-01-05 [2/2] Notmuch Test Suite; Deleted (deleted inbox unread)"
|
|
|
|
test_begin_subtest "regex at top level"
|
|
notmuch search --query=sexp '(rx foo)' >& OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
illegal 'rx' outside field
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regex in illegal field"
|
|
notmuch search --query=sexp '(body (regex foo))' >& OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'regex' not supported in field 'body'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
notmuch search --output=messages from:cworth > cworth.msg-ids
|
|
|
|
test_begin_subtest "regexp 'from' search"
|
|
notmuch search --output=messages --query=sexp '(from (rx cworth))' > OUTPUT
|
|
test_expect_equal_file cworth.msg-ids OUTPUT
|
|
|
|
test_begin_subtest "regexp search for 'from' 2"
|
|
notmuch search from:/cworth@cworth.org/ and subject:patch | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (from (rx cworth@cworth.org)) (subject patch))' \
|
|
| notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'folder' search"
|
|
notmuch search 'folder:/^bar$/' | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(folder (rx ^bar$))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'id' search"
|
|
notmuch search --output=messages --query=sexp '(id (rx yoom))' > OUTPUT
|
|
test_expect_equal_file cworth.msg-ids OUTPUT
|
|
|
|
test_begin_subtest "unanchored 'is' search"
|
|
notmuch search tag:signed or tag:inbox > EXPECTED
|
|
notmuch search --query=sexp '(is (rx i))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "anchored 'is' search"
|
|
notmuch search tag:signed > EXPECTED
|
|
notmuch search --query=sexp '(is (rx ^si))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "combine regexp mid and subject"
|
|
notmuch search subject:/-C/ and mid:/y..m/ | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (subject (rx -C)) (mid (rx y..m)))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'path' search"
|
|
notmuch search 'path:/^bar$/' | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(path (rx ^bar$))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'property' search"
|
|
notmuch search property:foo=bar > EXPECTED
|
|
notmuch search --query=sexp '(property (rx foo=.*))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'property' search via field processor"
|
|
notmuch search property:foo=bar > EXPECTED
|
|
notmuch search 'sexp:"(property (rx foo=.*))"' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "anchored 'tag' search"
|
|
notmuch search tag:signed > EXPECTED
|
|
notmuch search --query=sexp '(tag (rx ^si))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "regexp 'thread' search"
|
|
notmuch search --output=threads '*' | grep '7$' > EXPECTED
|
|
notmuch search --output=threads --query=sexp '(thread (rx 7$))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Basic query that matches no messages"
|
|
count=$(notmuch count from:keithp and to:keithp)
|
|
test_expect_equal 0 "$count"
|
|
|
|
test_begin_subtest "Same query against threads"
|
|
notmuch search --query=sexp '(and (thread (of (from keithp))) (thread (matching (to keithp))))' \
|
|
| notmuch_search_sanitize > OUTPUT
|
|
cat<<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [7/7] Lars Kellogg-Stedman, Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Mix thread and non-threads query"
|
|
notmuch search --query=sexp '(and (thread (matching keithp)) (to keithp))' | notmuch_search_sanitize > OUTPUT
|
|
cat<<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [1/7] Lars Kellogg-Stedman| Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Compound subquery"
|
|
notmuch search --query=sexp '(thread (of (from keithp) (subject Maildir)))' | notmuch_search_sanitize > OUTPUT
|
|
cat<<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [7/7] Lars Kellogg-Stedman, Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Compound subquery via field processor"
|
|
notmuch search 'sexp:"(thread (of (from keithp) (subject Maildir)))"' | notmuch_search_sanitize > OUTPUT
|
|
cat<<EOF > EXPECTED
|
|
thread:XXX 2009-11-18 [7/7] Lars Kellogg-Stedman, Mikhail Gusarov, Keith Packard, Carl Worth; [notmuch] Working with Maildir storage? (inbox signed unread)
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "empty subquery"
|
|
notmuch search --query=sexp '(thread (of))' 1>OUTPUT 2>&1
|
|
notmuch search '*' > EXPECTED
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "illegal expansion"
|
|
notmuch search --query=sexp '(id (of ego))' 1>OUTPUT 2>&1
|
|
cat<<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'of' unsupported inside 'id'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "(folder (of subquery))"
|
|
notmuch search --query=sexp --output=messages '(folder (of (id yun3a4cegoa.fsf@aiko.keithp.com)))' > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
id:yun1vjwegii.fsf@aiko.keithp.com
|
|
id:yun3a4cegoa.fsf@aiko.keithp.com
|
|
id:1258509400-32511-1-git-send-email-stewart@flamingspork.com
|
|
id:1258506353-20352-1-git-send-email-stewart@flamingspork.com
|
|
id:20091118010116.GC25380@dottiness.seas.harvard.edu
|
|
id:20091118005829.GB25380@dottiness.seas.harvard.edu
|
|
id:cf0c4d610911171136h1713aa59w9cf9aa31f052ad0a@mail.gmail.com
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "infix query"
|
|
notmuch search to:searchbyto | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(infix "to:searchbyto")' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "bad infix query 1"
|
|
notmuch search --query=sexp '(infix "from:/unbalanced")' 2>&1| notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
Syntax error in infix query: from:/unbalanced
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "bad infix query 2"
|
|
notmuch search --query=sexp '(infix "thread:{unbalanced")' 2>&1| notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
Syntax error in infix query: thread:{unbalanced
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "bad infix query 3: bad nesting"
|
|
notmuch search --query=sexp '(subject (infix "tag:inbox"))' 2>&1| notmuch_search_sanitize > OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'infix' not supported inside 'subject'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "infix query that matches no messages"
|
|
notmuch search --query=sexp '(and (infix "from:keithp") (infix "to:keithp"))' > OUTPUT
|
|
test_expect_equal_file /dev/null OUTPUT
|
|
|
|
test_begin_subtest "compound infix query"
|
|
notmuch search date:2009-11-18..2009-11-18 and tag:unread > EXPECTED
|
|
notmuch search --query=sexp '(infix "date:2009-11-18..2009-11-18 and tag:unread")' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "compound infix query 2"
|
|
notmuch search date:2009-11-18..2009-11-18 and tag:unread > EXPECTED
|
|
notmuch search --query=sexp '(and (infix "date:2009-11-18..2009-11-18") (infix "tag:unread"))' > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, empty"
|
|
notmuch search from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date) (from keithp))'| notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, one argument"
|
|
notmuch search date:2009-11-18 and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date 2009-11-18) (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, two arguments"
|
|
notmuch search date:2009-11-17..2009-11-18 and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date 2009-11-17 2009-11-18) (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, lower bound only"
|
|
notmuch search date:2009-11-18.. and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date 2009-11-18 "") (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, upper bound only"
|
|
notmuch search date:..2009-11-17 and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date "" 2009-11-17) (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, lower bound only, using *"
|
|
notmuch search date:2009-11-18.. and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date 2009-11-18 *) (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, upper bound only, using *"
|
|
notmuch search date:..2009-11-17 and from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (date * 2009-11-17) (from keithp))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, illegal nesting 1"
|
|
notmuch search --query=sexp '(to (date))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'date' inside 'to'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, illegal nesting 2"
|
|
notmuch search --query=sexp '(to (date 2021-11-18))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'date' inside 'to'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, illegal nesting 3"
|
|
notmuch search --query=sexp '(date (to))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
expected atom as first argument of 'date'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, illegal nesting 4"
|
|
notmuch search --query=sexp '(date today (to))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
expected atom as second argument of 'date'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, too many arguments"
|
|
notmuch search --query=sexp '(date yesterday and tommorow)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'date' expects maximum of two arguments
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "date query, bad date"
|
|
notmuch search --query=sexp '(date "hawaiian-pizza-day")' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
Didn't understand date specification 'hawaiian-pizza-day'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, empty"
|
|
notmuch search from:keithp | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(and (lastmod) (from keithp))'| notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, one argument"
|
|
notmuch tag +4EFC743A.3060609@april.org id:4EFC743A.3060609@april.org
|
|
revision=$(notmuch count --lastmod '*' | cut -f3)
|
|
notmuch search lastmod:$revision..$revision | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(and (lastmod $revision))" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, one argument (negative)"
|
|
notmuch tag +4EFC743A.3060609@april.org id:4EFC743A.3060609@april.org
|
|
revision=$(notmuch count --lastmod '*' | cut -f3)
|
|
revision1=$((revision - 1))
|
|
notmuch search lastmod:$revision1..$revision1 | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod -1)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, two arguments"
|
|
notmuch tag +keithp from:keithp
|
|
revision2=$(notmuch count --lastmod '*' | cut -f3)
|
|
notmuch search lastmod:$revision..$revision2 | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(and (lastmod $revision $revision2))" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, two arguments, first negative"
|
|
revdiff=$((revision2 - revision))
|
|
notmuch search lastmod:$revision..$revision2 | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod -$revdiff $revision2)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, two arguments, second negative"
|
|
revdiff=$((revision2 - revision))
|
|
notmuch search lastmod:..$revision | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod 0 -$revdiff)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, lower bound only"
|
|
notmuch search lastmod:$revision.. | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod $revision \"\")" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, lower bound only (negative)"
|
|
notmuch search lastmod:$revision.. | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod -$revdiff \"\")" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, upper bound only"
|
|
notmuch search lastmod:..$revision2 | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod \"\" $revision2)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, upper bound only (negative)"
|
|
notmuch search lastmod:..$revision | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod \"\" -$revdiff)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, lower bound only, using *"
|
|
notmuch search lastmod:$revision.. | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod $revision *)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, upper bound only, using *"
|
|
notmuch search lastmod:..$revision2 | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp "(lastmod * $revision2)" | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, illegal nesting 1"
|
|
notmuch search --query=sexp '(to (lastmod))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'lastmod' inside 'to'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, bad from revision"
|
|
notmuch search --query=sexp '(lastmod apples)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
bad 'from' revision: 'apples'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, bad to revision"
|
|
notmuch search --query=sexp '(lastmod 0 apples)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
bad 'to' revision: 'apples'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, illegal nesting 2"
|
|
notmuch search --query=sexp '(to (lastmod 2021-11-18))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'lastmod' inside 'to'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, illegal nesting 3"
|
|
notmuch search --query=sexp '(lastmod (to))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
expected atom as first argument of 'lastmod'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, illegal nesting 4"
|
|
notmuch search --query=sexp '(lastmod today (to))' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
expected atom as second argument of 'lastmod'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "lastmod query, too many arguments"
|
|
notmuch search --query=sexp '(lastmod yesterday and tommorow)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'lastmod' expects maximum of two arguments
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "user header (unknown header)"
|
|
notmuch search --query=sexp '(FooBar)' >& OUTPUT
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
unknown prefix 'FooBar'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "adding user header"
|
|
test_expect_code 0 "notmuch config set index.header.List \"List-Id\""
|
|
|
|
test_begin_subtest "reindexing"
|
|
test_expect_code 0 'notmuch reindex "*"'
|
|
|
|
test_begin_subtest "wildcard search for user header"
|
|
grep -Ril List-Id ${MAIL_DIR} | sort | notmuch_dir_sanitize > EXPECTED
|
|
notmuch search --output=files --query=sexp '(List *)' | sort | notmuch_dir_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard search for user header via field processor"
|
|
grep -Ril List-Id ${MAIL_DIR} | sort | notmuch_dir_sanitize > EXPECTED
|
|
notmuch search --output=files 'sexp:"(List *)"' | sort | notmuch_dir_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "wildcard search for user header 2"
|
|
grep -Ril List-Id ${MAIL_DIR} | sort | notmuch_dir_sanitize > EXPECTED
|
|
notmuch search --output=files --query=sexp '(List (starts-with not))' | sort | notmuch_dir_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search for user header"
|
|
notmuch search List:notmuch | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(List notmuch)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search for user header (list token)"
|
|
notmuch search List:notmuch | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(List notmuch.notmuchmail.org)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search for user header (quoted string)"
|
|
notmuch search 'List:"notmuch notmuchmail org"' | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(List "notmuch notmuchmail org")' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "search for user header (atoms)"
|
|
notmuch search 'List:"notmuch notmuchmail org"' | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(List notmuch notmuchmail org)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "check saved query name"
|
|
test_expect_code 1 "notmuch config set squery.test '(subject utf8-sübjéct)'"
|
|
|
|
test_begin_subtest "roundtrip saved query (database)"
|
|
notmuch config set --database squery.Test '(subject utf8-sübjéct)'
|
|
output=$(notmuch config get squery.Test)
|
|
test_expect_equal "$output" '(subject utf8-sübjéct)'
|
|
|
|
test_begin_subtest "roundtrip saved query"
|
|
notmuch config set squery.Test '(subject override subject)'
|
|
output=$(notmuch config get squery.Test)
|
|
test_expect_equal "$output" '(subject override subject)'
|
|
|
|
test_begin_subtest "unknown saved query"
|
|
notmuch search --query=sexp '(Unknown foo bar)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
unknown prefix 'Unknown'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "syntax error in saved query"
|
|
notmuch config set squery.Bad '(Bad'
|
|
notmuch search --query=sexp '(Bad foo bar)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
invalid saved s-expression query: '(Bad'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search by 'tag' and 'subject'"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.TagSubject '(and (tag inbox) (subject maildir))'
|
|
notmuch search --query=sexp '(TagSubject)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: illegal nesting"
|
|
notmuch config set squery.TagSubject '(and (tag inbox) (subject maildir))'
|
|
notmuch search --query=sexp '(subject (TagSubject))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
nested field: 'tag' inside 'subject'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: list as prefix"
|
|
notmuch config set squery.Bad2 '((and) (tag inbox) (subject maildir))'
|
|
notmuch search --query=sexp '(Bad2)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
unexpected list in field/operation position
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax"
|
|
notmuch config set squery.Bad3 '(macro a b)'
|
|
notmuch search --query=sexp '(Bad3)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
missing (possibly empty) list of arguments to macro
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 2"
|
|
notmuch config set squery.Bad4 '(macro ((a b)) a)'
|
|
notmuch search --query=sexp '(Bad4 1)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
macro parameters must be unquoted atoms
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 3"
|
|
notmuch config set squery.Bad5 '(macro (a b) a)'
|
|
notmuch search --query=sexp '(Bad5 1)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
too few arguments to macro
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 4"
|
|
notmuch search --query=sexp '(Bad5 1 2 3)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
too many arguments to macro
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 5"
|
|
notmuch config set squery.Bad5 '(macro (thing) (tag (rx ,thing)))'
|
|
notmuch search --query=sexp '(Bad5 (1 2))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'rx' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 6"
|
|
notmuch config set squery.Bad6 '(macro (thing) (tag (starts-with ,thing)))'
|
|
notmuch search --query=sexp '(Bad6 (1 2))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
'starts-with' expects single atom as argument
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: bad parameter syntax 7"
|
|
notmuch search --query=sexp '(subject (rx ,unknown))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
undefined parameter 'unknown'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Saved Search: macro without body"
|
|
notmuch config set squery.Bad3 '(macro (a b))'
|
|
notmuch search --query=sexp '(Bad3)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
missing body of macro
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "macro in query"
|
|
notmuch search --query=sexp '(macro (a) (and ,b (subject maildir)))' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
macro definition not permitted here
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "zero argument macro"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.TagSubject0 '(macro () (and (tag inbox) (subject maildir)))'
|
|
notmuch search --query=sexp '(TagSubject0)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "undefined argument"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.Bad6 '(macro (a) (and ,b (subject maildir)))'
|
|
notmuch search --query=sexp '(Bad6 foo)' >OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
undefined parameter 'b'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Single argument macro"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.TagSubject1 '(macro (tagname) (and (tag ,tagname) (subject maildir)))'
|
|
notmuch search --query=sexp '(TagSubject1 inbox)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "Single argument macro, list argument"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.ThingSubject '(macro (thing) (and ,thing (subject maildir)))'
|
|
notmuch search --query=sexp '(ThingSubject (tag inbox))' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "two argument macro"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.TagSubject2 '(macro (tagname subj) (and (tag ,tagname) (subject ,subj)))'
|
|
notmuch search --query=sexp '(TagSubject2 inbox maildir)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "macro in regex"
|
|
notmuch search tag:inbox and date:2009-11-17 | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.D '(macro (tagname) (and (date 2009-11-17) (tag (rx ,tagname))))'
|
|
notmuch search --query=sexp '(D inbo)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "macro in wildcard"
|
|
notmuch search tag:inbox and date:2009-11-17 | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.W '(macro (tagname) (and (date 2009-11-17) (tag (starts-with ,tagname))))'
|
|
notmuch search --query=sexp '(W inbo)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "nested macros (shadowing)"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.Inner '(macro (x) (subject ,x))'
|
|
notmuch config set squery.Outer '(macro (x y) (and (tag ,x) (Inner ,y)))'
|
|
notmuch search --query=sexp '(Outer inbox maildir)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "nested macros (no dynamic scope)"
|
|
notmuch config set squery.Inner2 '(macro (x) (subject ,y))'
|
|
notmuch config set squery.Outer2 '(macro (x y) (and (tag ,x) (Inner2 ,y)))'
|
|
notmuch search --query=sexp '(Outer2 inbox maildir)' > OUTPUT 2>&1
|
|
cat <<EOF > EXPECTED
|
|
notmuch search: Syntax error in query
|
|
undefined parameter 'y'
|
|
EOF
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "nested macros (shadowing, regex)"
|
|
notmuch search tag:/inbo/ and subject:/Maildi/ | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.Inner3 '(macro (x) (subject (rx ,x)))'
|
|
notmuch config set squery.Outer3 '(macro (x y) (and (tag (rx ,x)) (Inner3 ,y)))'
|
|
notmuch search --query=sexp '(Outer3 inbo Maildi)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "nested macros (shadowing, wildcard)"
|
|
notmuch search tag:inbox and subject:maildir | notmuch_search_sanitize > EXPECTED
|
|
notmuch config set squery.Inner4 '(macro (x) (subject (starts-with ,x)))'
|
|
notmuch config set squery.Outer4 '(macro (x y) (and (tag (starts-with ,x)) (Inner4 ,y)))'
|
|
notmuch search --query=sexp '(Outer4 inbo maildi)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file_nonempty EXPECTED OUTPUT
|
|
|
|
test_begin_subtest "combine macro and user defined header"
|
|
notmuch config set squery.About '(macro (name) (or (subject ,name) (List ,name)))'
|
|
notmuch search subject:notmuch or List:notmuch | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(About notmuch)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
|
|
test_begin_subtest "combine macro and user defined header"
|
|
notmuch config set squery.About '(macro (name) (or (subject ,name) (List ,name)))'
|
|
notmuch search subject:notmuch or List:notmuch | notmuch_search_sanitize > EXPECTED
|
|
notmuch search --query=sexp '(About notmuch)' | notmuch_search_sanitize > OUTPUT
|
|
test_expect_equal_file EXPECTED OUTPUT
|
|
|
|
|
|
test_done
|