1 /* notmuch - Not much of an email program, (just index and search)
3 * Copyright © 2009 Carl Worth
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see https://www.gnu.org/licenses/ .
18 * Author: Carl Worth <cworth@cworth.org>
21 #include "notmuch-client.h"
23 #include "string-util.h"
27 OUTPUT_SUMMARY = 1 << 0,
28 OUTPUT_THREADS = 1 << 1,
29 OUTPUT_MESSAGES = 1 << 2,
30 OUTPUT_FILES = 1 << 3,
34 OUTPUT_SENDER = 1 << 5,
35 OUTPUT_RECIPIENTS = 1 << 6,
36 OUTPUT_COUNT = 1 << 7,
53 notmuch_database_t *notmuch;
54 format_sel_t format_sel;
56 notmuch_exclude_t exclude;
57 notmuch_query_t *query;
63 GHashTable *addresses;
73 /* Return two stable query strings that identify exactly the matched
74 * and unmatched messages currently in thread. If there are no
75 * matched or unmatched messages, the returned buffers will be
78 get_thread_query (notmuch_thread_t *thread,
79 char **matched_out, char **unmatched_out)
81 notmuch_messages_t *messages;
83 size_t escaped_len = 0;
85 *matched_out = *unmatched_out = NULL;
87 for (messages = notmuch_thread_get_messages (thread);
88 notmuch_messages_valid (messages);
89 notmuch_messages_move_to_next (messages))
91 notmuch_message_t *message = notmuch_messages_get (messages);
92 const char *mid = notmuch_message_get_message_id (message);
93 /* Determine which query buffer to extend */
94 char **buf = notmuch_message_get_flag (
95 message, NOTMUCH_MESSAGE_FLAG_MATCH) ? matched_out : unmatched_out;
96 /* Add this message's id: query. Since "id" is an exclusive
97 * prefix, it is implicitly 'or'd together, so we only need to
98 * join queries with a space. */
99 if (make_boolean_term (thread, "id", mid, &escaped, &escaped_len) < 0)
102 *buf = talloc_asprintf_append_buffer (*buf, " %s", escaped);
104 *buf = talloc_strdup (thread, escaped);
108 talloc_free (escaped);
113 do_search_threads (search_context_t *ctx)
115 notmuch_thread_t *thread;
116 notmuch_threads_t *threads;
117 notmuch_tags_t *tags;
118 sprinter_t *format = ctx->format;
121 notmuch_status_t status;
123 if (ctx->offset < 0) {
125 notmuch_status_t status;
126 status = notmuch_query_count_threads (ctx->query, &count);
127 if (print_status_query ("notmuch search", ctx->query, status))
130 ctx->offset += count;
135 status = notmuch_query_search_threads (ctx->query, &threads);
136 if (print_status_query("notmuch search", ctx->query, status))
139 format->begin_list (format);
142 notmuch_threads_valid (threads) && (ctx->limit < 0 || i < ctx->offset + ctx->limit);
143 notmuch_threads_move_to_next (threads), i++)
145 thread = notmuch_threads_get (threads);
147 if (i < ctx->offset) {
148 notmuch_thread_destroy (thread);
152 if (ctx->output == OUTPUT_THREADS) {
153 format->set_prefix (format, "thread");
154 format->string (format,
155 notmuch_thread_get_thread_id (thread));
156 format->separator (format);
157 } else { /* output == OUTPUT_SUMMARY */
158 void *ctx_quote = talloc_new (thread);
159 const char *authors = notmuch_thread_get_authors (thread);
160 const char *subject = notmuch_thread_get_subject (thread);
161 const char *thread_id = notmuch_thread_get_thread_id (thread);
162 int matched = notmuch_thread_get_matched_messages (thread);
163 int total = notmuch_thread_get_total_messages (thread);
164 const char *relative_date = NULL;
165 notmuch_bool_t first_tag = TRUE;
167 format->begin_map (format);
169 if (ctx->sort == NOTMUCH_SORT_OLDEST_FIRST)
170 date = notmuch_thread_get_oldest_date (thread);
172 date = notmuch_thread_get_newest_date (thread);
174 relative_date = notmuch_time_relative_date (ctx_quote, date);
176 if (format->is_text_printer) {
177 /* Special case for the text formatter */
178 printf ("thread:%s %12s [%d/%d] %s; %s (",
183 sanitize_string (ctx_quote, authors),
184 sanitize_string (ctx_quote, subject));
185 } else { /* Structured Output */
186 format->map_key (format, "thread");
187 format->string (format, thread_id);
188 format->map_key (format, "timestamp");
189 format->integer (format, date);
190 format->map_key (format, "date_relative");
191 format->string (format, relative_date);
192 format->map_key (format, "matched");
193 format->integer (format, matched);
194 format->map_key (format, "total");
195 format->integer (format, total);
196 format->map_key (format, "authors");
197 format->string (format, authors);
198 format->map_key (format, "subject");
199 format->string (format, subject);
200 if (notmuch_format_version >= 2) {
201 char *matched_query, *unmatched_query;
202 if (get_thread_query (thread, &matched_query,
203 &unmatched_query) < 0) {
204 fprintf (stderr, "Out of memory\n");
207 format->map_key (format, "query");
208 format->begin_list (format);
210 format->string (format, matched_query);
212 format->null (format);
214 format->string (format, unmatched_query);
216 format->null (format);
217 format->end (format);
221 talloc_free (ctx_quote);
223 format->map_key (format, "tags");
224 format->begin_list (format);
226 for (tags = notmuch_thread_get_tags (thread);
227 notmuch_tags_valid (tags);
228 notmuch_tags_move_to_next (tags))
230 const char *tag = notmuch_tags_get (tags);
232 if (format->is_text_printer) {
233 /* Special case for the text formatter */
239 } else { /* Structured Output */
240 format->string (format, tag);
244 if (format->is_text_printer)
247 format->end (format);
248 format->end (format);
249 format->separator (format);
252 notmuch_thread_destroy (thread);
255 format->end (format);
260 static mailbox_t *new_mailbox (void *ctx, const char *name, const char *addr)
264 mailbox = talloc (ctx, mailbox_t);
268 mailbox->name = talloc_strdup (mailbox, name);
269 mailbox->addr = talloc_strdup (mailbox, addr);
275 static int mailbox_compare (const void *v1, const void *v2)
277 const mailbox_t *m1 = v1, *m2 = v2;
280 ret = strcmp_null (m1->name, m2->name);
282 ret = strcmp (m1->addr, m2->addr);
287 /* Returns TRUE iff name and addr is duplicate. If not, stores the
288 * name/addr pair in order to detect subsequent duplicates. */
289 static notmuch_bool_t
290 is_duplicate (const search_context_t *ctx, const char *name, const char *addr)
296 list = g_hash_table_lookup (ctx->addresses, addr);
303 l = g_list_find_custom (list, &find, mailbox_compare);
310 mailbox = new_mailbox (ctx->format, name, addr);
315 * XXX: It would be more efficient to prepend to the list, but
316 * then we'd have to store the changed list head back to the
317 * hash table. This check is here just to avoid the compiler
318 * warning for unused result.
320 if (list != g_list_append (list, mailbox))
321 INTERNAL_ERROR ("appending to list changed list head\n");
326 key = talloc_strdup (ctx->format, addr);
330 mailbox = new_mailbox (ctx->format, name, addr);
334 list = g_list_append (NULL, mailbox);
338 g_hash_table_insert (ctx->addresses, key, list);
344 print_mailbox (const search_context_t *ctx, const mailbox_t *mailbox)
346 const char *name = mailbox->name;
347 const char *addr = mailbox->addr;
348 int count = mailbox->count;
349 sprinter_t *format = ctx->format;
350 InternetAddress *ia = internet_address_mailbox_new (name, addr);
353 /* name_addr has the name part quoted if necessary. Compare
354 * 'John Doe <john@doe.com>' vs. '"Doe, John" <john@doe.com>' */
355 name_addr = internet_address_to_string (ia, FALSE);
357 if (format->is_text_printer) {
358 if (ctx->output & OUTPUT_COUNT) {
359 format->integer (format, count);
360 format->string (format, "\t");
362 format->string (format, name_addr);
363 format->separator (format);
365 format->begin_map (format);
366 format->map_key (format, "name");
367 format->string (format, name);
368 format->map_key (format, "address");
369 format->string (format, addr);
370 format->map_key (format, "name-addr");
371 format->string (format, name_addr);
372 if (ctx->output & OUTPUT_COUNT) {
373 format->map_key (format, "count");
374 format->integer (format, count);
376 format->end (format);
377 format->separator (format);
384 /* Print or prepare for printing addresses from InternetAddressList. */
386 process_address_list (const search_context_t *ctx,
387 InternetAddressList *list)
389 InternetAddress *address;
392 for (i = 0; i < internet_address_list_length (list); i++) {
393 address = internet_address_list_get_address (list, i);
394 if (INTERNET_ADDRESS_IS_GROUP (address)) {
395 InternetAddressGroup *group;
396 InternetAddressList *group_list;
398 group = INTERNET_ADDRESS_GROUP (address);
399 group_list = internet_address_group_get_members (group);
400 if (group_list == NULL)
403 process_address_list (ctx, group_list);
405 InternetAddressMailbox *mailbox = INTERNET_ADDRESS_MAILBOX (address);
407 .name = internet_address_get_name (address),
408 .addr = internet_address_mailbox_get_addr (mailbox),
411 /* OUTPUT_COUNT only works with deduplication */
412 if (ctx->dedup != DEDUP_NONE &&
413 is_duplicate (ctx, mbx.name, mbx.addr))
416 /* OUTPUT_COUNT and DEDUP_ADDRESS require a full pass. */
417 if (ctx->output & OUTPUT_COUNT || ctx->dedup == DEDUP_ADDRESS)
420 print_mailbox (ctx, &mbx);
425 /* Print or prepare for printing addresses from a message header. */
427 process_address_header (const search_context_t *ctx, const char *value)
429 InternetAddressList *list;
434 list = internet_address_list_parse_string (value);
438 process_address_list (ctx, list);
440 g_object_unref (list);
443 /* Destructor for talloc-allocated GHashTable keys and values. */
445 _talloc_free_for_g_hash (void *ptr)
451 _list_free_for_g_hash (void *ptr)
453 g_list_free_full (ptr, _talloc_free_for_g_hash);
456 /* Print the most common variant of a list of unique mailboxes, and
457 * conflate the counts. */
459 print_popular (const search_context_t *ctx, GList *list)
462 mailbox_t *mailbox = NULL, *m;
466 for (l = list; l; l = l->next) {
469 if (m->count > max) {
476 INTERNAL_ERROR("Empty list in address hash table\n");
478 /* The original count is no longer needed, so overwrite. */
479 mailbox->count = total;
481 print_mailbox (ctx, mailbox);
485 print_list_value (void *mailbox, void *context)
487 print_mailbox (context, mailbox);
491 print_hash_value (unused (void *key), void *list, void *context)
493 const search_context_t *ctx = context;
495 if (ctx->dedup == DEDUP_ADDRESS)
496 print_popular (ctx, list);
498 g_list_foreach (list, print_list_value, context);
502 _count_filenames (notmuch_message_t *message)
504 notmuch_filenames_t *filenames;
507 filenames = notmuch_message_get_filenames (message);
509 while (notmuch_filenames_valid (filenames)) {
510 notmuch_filenames_move_to_next (filenames);
514 notmuch_filenames_destroy (filenames);
520 do_search_messages (search_context_t *ctx)
522 notmuch_message_t *message;
523 notmuch_messages_t *messages;
524 notmuch_filenames_t *filenames;
525 sprinter_t *format = ctx->format;
527 notmuch_status_t status;
529 if (ctx->offset < 0) {
531 notmuch_status_t status;
532 status = notmuch_query_count_messages (ctx->query, &count);
533 if (print_status_query ("notmuch search", ctx->query, status))
536 ctx->offset += count;
541 status = notmuch_query_search_messages (ctx->query, &messages);
542 if (print_status_query ("notmuch search", ctx->query, status))
545 format->begin_list (format);
548 notmuch_messages_valid (messages) && (ctx->limit < 0 || i < ctx->offset + ctx->limit);
549 notmuch_messages_move_to_next (messages), i++)
554 message = notmuch_messages_get (messages);
556 if (ctx->output == OUTPUT_FILES) {
558 filenames = notmuch_message_get_filenames (message);
561 notmuch_filenames_valid (filenames);
562 notmuch_filenames_move_to_next (filenames), j++)
564 if (ctx->dupe < 0 || ctx->dupe == j) {
565 format->string (format, notmuch_filenames_get (filenames));
566 format->separator (format);
570 notmuch_filenames_destroy( filenames );
572 } else if (ctx->output == OUTPUT_MESSAGES) {
573 /* special case 1 for speed */
574 if (ctx->dupe <= 1 || ctx->dupe <= _count_filenames (message)) {
575 format->set_prefix (format, "id");
576 format->string (format,
577 notmuch_message_get_message_id (message));
578 format->separator (format);
581 if (ctx->output & OUTPUT_SENDER) {
584 addrs = notmuch_message_get_header (message, "from");
585 process_address_header (ctx, addrs);
588 if (ctx->output & OUTPUT_RECIPIENTS) {
589 const char *hdrs[] = { "to", "cc", "bcc" };
593 for (j = 0; j < ARRAY_SIZE (hdrs); j++) {
594 addrs = notmuch_message_get_header (message, hdrs[j]);
595 process_address_header (ctx, addrs);
600 notmuch_message_destroy (message);
603 if (ctx->addresses &&
604 (ctx->output & OUTPUT_COUNT || ctx->dedup == DEDUP_ADDRESS))
605 g_hash_table_foreach (ctx->addresses, print_hash_value, ctx);
607 notmuch_messages_destroy (messages);
609 format->end (format);
615 do_search_tags (const search_context_t *ctx)
617 notmuch_messages_t *messages = NULL;
618 notmuch_tags_t *tags;
620 sprinter_t *format = ctx->format;
621 notmuch_query_t *query = ctx->query;
622 notmuch_database_t *notmuch = ctx->notmuch;
624 /* should the following only special case if no excluded terms
627 /* Special-case query of "*" for better performance. */
628 if (strcmp (notmuch_query_get_query_string (query), "*") == 0) {
629 tags = notmuch_database_get_all_tags (notmuch);
631 notmuch_status_t status;
632 status = notmuch_query_search_messages (query, &messages);
633 if (print_status_query ("notmuch search", query, status))
636 tags = notmuch_messages_collect_tags (messages);
641 format->begin_list (format);
644 notmuch_tags_valid (tags);
645 notmuch_tags_move_to_next (tags))
647 tag = notmuch_tags_get (tags);
649 format->string (format, tag);
650 format->separator (format);
654 notmuch_tags_destroy (tags);
657 notmuch_messages_destroy (messages);
659 format->end (format);
665 _notmuch_search_prepare (search_context_t *ctx, notmuch_config_t *config, int argc, char *argv[])
669 char *status_string = NULL;
671 switch (ctx->format_sel) {
672 case NOTMUCH_FORMAT_TEXT:
673 ctx->format = sprinter_text_create (config, stdout);
675 case NOTMUCH_FORMAT_TEXT0:
676 if (ctx->output == OUTPUT_SUMMARY) {
677 fprintf (stderr, "Error: --format=text0 is not compatible with --output=summary.\n");
680 ctx->format = sprinter_text0_create (config, stdout);
682 case NOTMUCH_FORMAT_JSON:
683 ctx->format = sprinter_json_create (config, stdout);
685 case NOTMUCH_FORMAT_SEXP:
686 ctx->format = sprinter_sexp_create (config, stdout);
689 /* this should never happen */
690 INTERNAL_ERROR("no output format selected");
693 notmuch_exit_if_unsupported_format ();
695 if (notmuch_database_open_verbose (
696 notmuch_config_get_database_path (config),
697 NOTMUCH_DATABASE_MODE_READ_ONLY, &ctx->notmuch, &status_string)) {
700 fputs (status_string, stderr);
701 free (status_string);
707 notmuch_exit_if_unmatched_db_uuid (ctx->notmuch);
709 query_str = query_string_from_args (ctx->notmuch, argc, argv);
710 if (query_str == NULL) {
711 fprintf (stderr, "Out of memory.\n");
714 if (*query_str == '\0') {
715 fprintf (stderr, "Error: notmuch search requires at least one search term.\n");
719 ctx->query = notmuch_query_create (ctx->notmuch, query_str);
720 if (ctx->query == NULL) {
721 fprintf (stderr, "Out of memory\n");
725 notmuch_query_set_sort (ctx->query, ctx->sort);
727 if (ctx->exclude == NOTMUCH_EXCLUDE_FLAG && ctx->output != OUTPUT_SUMMARY) {
728 /* If we are not doing summary output there is nowhere to
729 * print the excluded flag so fall back on including the
730 * excluded messages. */
731 fprintf (stderr, "Warning: this output format cannot flag excluded messages.\n");
732 ctx->exclude = NOTMUCH_EXCLUDE_FALSE;
735 if (ctx->exclude != NOTMUCH_EXCLUDE_FALSE) {
736 const char **search_exclude_tags;
737 size_t search_exclude_tags_length;
738 notmuch_status_t status;
740 search_exclude_tags = notmuch_config_get_search_exclude_tags
741 (config, &search_exclude_tags_length);
743 for (i = 0; i < search_exclude_tags_length; i++) {
744 status = notmuch_query_add_tag_exclude (ctx->query, search_exclude_tags[i]);
745 if (status && status != NOTMUCH_STATUS_IGNORED) {
746 print_status_query ("notmuch search", ctx->query, status);
751 notmuch_query_set_omit_excluded (ctx->query, ctx->exclude);
758 _notmuch_search_cleanup (search_context_t *ctx)
760 notmuch_query_destroy (ctx->query);
761 notmuch_database_destroy (ctx->notmuch);
763 talloc_free (ctx->format);
766 static search_context_t search_context = {
767 .format_sel = NOTMUCH_FORMAT_TEXT,
768 .exclude = NOTMUCH_EXCLUDE_TRUE,
769 .sort = NOTMUCH_SORT_NEWEST_FIRST,
772 .limit = -1, /* unlimited */
774 .dedup = DEDUP_MAILBOX,
777 static const notmuch_opt_desc_t common_options[] = {
778 { NOTMUCH_OPT_KEYWORD, &search_context.sort, "sort", 's',
779 (notmuch_keyword_t []){ { "oldest-first", NOTMUCH_SORT_OLDEST_FIRST },
780 { "newest-first", NOTMUCH_SORT_NEWEST_FIRST },
782 { NOTMUCH_OPT_KEYWORD, &search_context.format_sel, "format", 'f',
783 (notmuch_keyword_t []){ { "json", NOTMUCH_FORMAT_JSON },
784 { "sexp", NOTMUCH_FORMAT_SEXP },
785 { "text", NOTMUCH_FORMAT_TEXT },
786 { "text0", NOTMUCH_FORMAT_TEXT0 },
788 { NOTMUCH_OPT_INT, ¬much_format_version, "format-version", 0, 0 },
793 notmuch_search_command (notmuch_config_t *config, int argc, char *argv[])
795 search_context_t *ctx = &search_context;
798 notmuch_opt_desc_t options[] = {
799 { NOTMUCH_OPT_KEYWORD, &ctx->output, "output", 'o',
800 (notmuch_keyword_t []){ { "summary", OUTPUT_SUMMARY },
801 { "threads", OUTPUT_THREADS },
802 { "messages", OUTPUT_MESSAGES },
803 { "files", OUTPUT_FILES },
804 { "tags", OUTPUT_TAGS },
806 { NOTMUCH_OPT_KEYWORD, &ctx->exclude, "exclude", 'x',
807 (notmuch_keyword_t []){ { "true", NOTMUCH_EXCLUDE_TRUE },
808 { "false", NOTMUCH_EXCLUDE_FALSE },
809 { "flag", NOTMUCH_EXCLUDE_FLAG },
810 { "all", NOTMUCH_EXCLUDE_ALL },
812 { NOTMUCH_OPT_INT, &ctx->offset, "offset", 'O', 0 },
813 { NOTMUCH_OPT_INT, &ctx->limit, "limit", 'L', 0 },
814 { NOTMUCH_OPT_INT, &ctx->dupe, "duplicate", 'D', 0 },
815 { NOTMUCH_OPT_INHERIT, (void *) &common_options, NULL, 0, 0 },
816 { NOTMUCH_OPT_INHERIT, (void *) ¬much_shared_options, NULL, 0, 0 },
820 ctx->output = OUTPUT_SUMMARY;
821 opt_index = parse_arguments (argc, argv, options, 1);
825 notmuch_process_shared_options (argv[0]);
827 if (ctx->output != OUTPUT_FILES && ctx->output != OUTPUT_MESSAGES &&
829 fprintf (stderr, "Error: --duplicate=N is only supported with --output=files and --output=messages.\n");
833 if (_notmuch_search_prepare (ctx, config,
834 argc - opt_index, argv + opt_index))
837 switch (ctx->output) {
840 ret = do_search_threads (ctx);
842 case OUTPUT_MESSAGES:
844 ret = do_search_messages (ctx);
847 ret = do_search_tags (ctx);
850 INTERNAL_ERROR ("Unexpected output");
853 _notmuch_search_cleanup (ctx);
855 return ret ? EXIT_FAILURE : EXIT_SUCCESS;
859 notmuch_address_command (notmuch_config_t *config, int argc, char *argv[])
861 search_context_t *ctx = &search_context;
864 notmuch_opt_desc_t options[] = {
865 { NOTMUCH_OPT_KEYWORD_FLAGS, &ctx->output, "output", 'o',
866 (notmuch_keyword_t []){ { "sender", OUTPUT_SENDER },
867 { "recipients", OUTPUT_RECIPIENTS },
868 { "count", OUTPUT_COUNT },
870 { NOTMUCH_OPT_KEYWORD, &ctx->exclude, "exclude", 'x',
871 (notmuch_keyword_t []){ { "true", NOTMUCH_EXCLUDE_TRUE },
872 { "false", NOTMUCH_EXCLUDE_FALSE },
874 { NOTMUCH_OPT_KEYWORD, &ctx->dedup, "deduplicate", 'D',
875 (notmuch_keyword_t []){ { "no", DEDUP_NONE },
876 { "mailbox", DEDUP_MAILBOX },
877 { "address", DEDUP_ADDRESS },
879 { NOTMUCH_OPT_INHERIT, (void *) &common_options, NULL, 0, 0 },
880 { NOTMUCH_OPT_INHERIT, (void *) ¬much_shared_options, NULL, 0, 0 },
884 opt_index = parse_arguments (argc, argv, options, 1);
888 notmuch_process_shared_options (argv[0]);
890 if (! (ctx->output & (OUTPUT_SENDER | OUTPUT_RECIPIENTS)))
891 ctx->output |= OUTPUT_SENDER;
893 if (ctx->output & OUTPUT_COUNT && ctx->dedup == DEDUP_NONE) {
894 fprintf (stderr, "--output=count is not applicable with --deduplicate=no\n");
898 if (_notmuch_search_prepare (ctx, config,
899 argc - opt_index, argv + opt_index))
902 ctx->addresses = g_hash_table_new_full (strcase_hash, strcase_equal,
903 _talloc_free_for_g_hash,
904 _list_free_for_g_hash);
906 /* The order is not guaranteed if a full pass is required, so go
908 if (ctx->output & OUTPUT_COUNT || ctx->dedup == DEDUP_ADDRESS)
909 notmuch_query_set_sort (ctx->query, NOTMUCH_SORT_UNSORTED);
911 ret = do_search_messages (ctx);
913 g_hash_table_unref (ctx->addresses);
916 _notmuch_search_cleanup (ctx);
918 return ret ? EXIT_FAILURE : EXIT_SUCCESS;