ff1ebab10d758b963a4774f91e89a43c6be3c50f
[notmuch] / notmuch-restore.c
1 /* notmuch - Not much of an email program, (just index and search)
2  *
3  * Copyright © 2009 Carl Worth
4  *
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.
9  *
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.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program.  If not, see http://www.gnu.org/licenses/ .
17  *
18  * Author: Carl Worth <cworth@cworth.org>
19  */
20
21 #include <getopt.h>
22
23 #include "notmuch-client.h"
24
25 int
26 notmuch_restore_command (unused (void *ctx), int argc, char *argv[])
27 {
28     notmuch_config_t *config;
29     notmuch_database_t *notmuch;
30     notmuch_bool_t synchronize_flags;
31     notmuch_bool_t accumulate = FALSE;
32     FILE *input = stdin;
33     char *line = NULL;
34     size_t line_size;
35     ssize_t line_len;
36     regex_t regex;
37     int rerr;
38
39     config = notmuch_config_open (ctx, NULL, NULL);
40     if (config == NULL)
41         return 1;
42
43     notmuch = notmuch_database_open (notmuch_config_get_database_path (config),
44                                      NOTMUCH_DATABASE_MODE_READ_WRITE);
45     if (notmuch == NULL)
46         return 1;
47
48     synchronize_flags = notmuch_config_get_maildir_synchronize_flags (config);
49
50     struct option options[] = {
51         { "accumulate",   no_argument,       0, 'a' },
52         { 0, 0, 0, 0}
53     };
54
55     int opt;
56     do {
57         opt = getopt_long (argc, argv, "", options, NULL);
58
59         switch (opt) {
60         case 'a':
61             accumulate = 1;
62             break;
63         case '?':
64             return 1;
65             break;
66         }
67
68     } while (opt != -1);
69
70     if (optind < argc) {
71         input = fopen (argv[optind], "r");
72         if (input == NULL) {
73             fprintf (stderr, "Error opening %s for reading: %s\n",
74                      argv[optind], strerror (errno));
75             return 1;
76         }
77         optind++;
78     }
79
80     if (optind < argc) {
81         fprintf (stderr,
82          "Cannot read dump from more than one file: %s\n",
83                  argv[optind]);
84         return 1;
85     }
86
87     /* Dump output is one line per message. We match a sequence of
88      * non-space characters for the message-id, then one or more
89      * spaces, then a list of space-separated tags as a sequence of
90      * characters within literal '(' and ')'. */
91     xregcomp (&regex,
92               "^([^ ]+) \\(([^)]*)\\)$",
93               REG_EXTENDED);
94
95     while ((line_len = getline (&line, &line_size, input)) != -1) {
96         regmatch_t match[3];
97         char *message_id, *file_tags, *tag, *next;
98         notmuch_message_t *message = NULL;
99         notmuch_status_t status;
100         notmuch_tags_t *db_tags;
101         char *db_tags_str;
102
103         chomp_newline (line);
104
105         rerr = xregexec (&regex, line, 3, match, 0);
106         if (rerr == REG_NOMATCH)
107         {
108             fprintf (stderr, "Warning: Ignoring invalid input line: %s\n",
109                      line);
110             continue;
111         }
112
113         message_id = xstrndup (line + match[1].rm_so,
114                                match[1].rm_eo - match[1].rm_so);
115         file_tags = xstrndup (line + match[2].rm_so,
116                               match[2].rm_eo - match[2].rm_so);
117
118         status = notmuch_database_find_message (notmuch, message_id, &message);
119         if (status || message == NULL) {
120             fprintf (stderr, "Warning: Cannot apply tags to %smessage: %s\n",
121                      message ? "" : "missing ", message_id);
122             if (status)
123                 fprintf (stderr, "%s\n",
124                          notmuch_status_to_string(status));
125             goto NEXT_LINE;
126         }
127
128         /* In order to detect missing messages, this check/optimization is
129          * intentionally done *after* first finding the message.  */
130         if (accumulate && (file_tags == NULL || *file_tags == '\0'))
131         {
132             goto NEXT_LINE;
133         }
134
135         db_tags_str = NULL;
136         for (db_tags = notmuch_message_get_tags (message);
137              notmuch_tags_valid (db_tags);
138              notmuch_tags_move_to_next (db_tags))
139         {
140             const char *tag = notmuch_tags_get (db_tags);
141
142             if (db_tags_str)
143                 db_tags_str = talloc_asprintf_append (db_tags_str, " %s", tag);
144             else
145                 db_tags_str = talloc_strdup (message, tag);
146         }
147
148         if (((file_tags == NULL || *file_tags == '\0') &&
149              (db_tags_str == NULL || *db_tags_str == '\0')) ||
150             (file_tags && db_tags_str && strcmp (file_tags, db_tags_str) == 0))
151         {
152             goto NEXT_LINE;
153         }
154
155         notmuch_message_freeze (message);
156
157         if (!accumulate)
158             notmuch_message_remove_all_tags (message);
159
160         next = file_tags;
161         while (next) {
162             tag = strsep (&next, " ");
163             if (*tag == '\0')
164                 continue;
165             status = notmuch_message_add_tag (message, tag);
166             if (status) {
167                 fprintf (stderr,
168                          "Error applying tag %s to message %s:\n",
169                          tag, message_id);
170                 fprintf (stderr, "%s\n",
171                          notmuch_status_to_string (status));
172             }
173         }
174
175         notmuch_message_thaw (message);
176
177         if (synchronize_flags)
178             notmuch_message_tags_to_maildir_flags (message);
179
180       NEXT_LINE:
181         if (message)
182             notmuch_message_destroy (message);
183         message = NULL;
184         free (message_id);
185         free (file_tags);
186     }
187
188     regfree (&regex);
189
190     if (line)
191         free (line);
192
193     notmuch_database_close (notmuch);
194     if (input != stdin)
195         fclose (input);
196
197     return 0;
198 }