#!/usr/bin/env bash
test_description="message API"

. ./test-lib.sh || exit 1

add_email_corpus

cat <<EOF > c_head
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <talloc.h>
#include <notmuch-test.h>

int main (int argc, char** argv)
{
   notmuch_database_t *db;
   notmuch_message_t *message = NULL;
   const char *val;
   notmuch_status_t stat;

   EXPECT0(notmuch_database_open (argv[1], NOTMUCH_DATABASE_MODE_READ_WRITE, &db));
   EXPECT0(notmuch_database_find_message(db, "4EFC743A.3060609@april.org", &message));
   if (message == NULL) {
	fprintf (stderr, "unable to find message");
	exit (1);
   }
EOF

cat <<EOF > c_tail
   EXPECT0(notmuch_database_destroy(db));
}
EOF

add_email_corpus

test_begin_subtest "check unique term"
byid=$(notmuch count id:4EFC743A.3060609@april.org)
byterm=$(notmuch count Boulogne)
test_expect_equal "$byid" "$byterm"

xapian-delve -1 -a ${MAIL_DIR}/.notmuch/xapian > BEFORE

test_begin_subtest "clear non-prefixed terms from message"
cat c_head - c_tail <<'EOF' | test_C ${MAIL_DIR}
{
notmuch_test_clear_terms(message);
}
EOF
byterm=$(notmuch count Boulogne)
test_expect_equal 0 "$byterm"

test_begin_subtest "check removed terms"
xapian-delve -1 -a ${MAIL_DIR}/.notmuch/xapian > AFTER
comm -2 -3 BEFORE AFTER | egrep '^Z?a' > REMOVED
cat <<EOF > EXPECTED
Zallan
Zarch
Zarch_packaging_standard
Zarchlinux
Zaur
allan
arch
arch_packaging_standards
archlinux
aur
EOF
test_expect_equal_file EXPECTED REMOVED

test_done