b0a4e1ce7905fc52157ce35c471fe1b31446f549
[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 "notmuch-client.h"
22
23 int
24 notmuch_restore_command (unused (void *ctx), int argc, char *argv[])
25 {
26     notmuch_config_t *config;
27     notmuch_database_t *notmuch;
28     FILE *input;
29     char *line = NULL;
30     size_t line_size;
31     ssize_t line_len;
32     regex_t regex;
33     int rerr;
34
35     config = notmuch_config_open (ctx, NULL, NULL);
36     if (config == NULL)
37         return 1;
38
39     notmuch = notmuch_database_open (notmuch_config_get_database_path (config),
40                                      NOTMUCH_DATABASE_MODE_READ_WRITE);
41     if (notmuch == NULL)
42         return 1;
43
44     if (argc) {
45         input = fopen (argv[0], "r");
46         if (input == NULL) {
47             fprintf (stderr, "Error opening %s for reading: %s\n",
48                      argv[0], strerror (errno));
49             return 1;
50         }
51     } else {
52         printf ("No filename given. Reading dump from stdin.\n");
53         input = stdin;
54     }
55
56     /* Dump output is one line per message. We match a sequence of
57      * non-space characters for the message-id, then one or more
58      * spaces, then a list of space-separated tags as a sequence of
59      * characters within literal '(' and ')'. */
60     xregcomp (&regex,
61               "^([^ ]+) \\(([^)]*)\\)$",
62               REG_EXTENDED);
63
64     while ((line_len = getline (&line, &line_size, input)) != -1) {
65         regmatch_t match[3];
66         char *message_id, *file_tags, *tag, *next;
67         notmuch_message_t *message = NULL;
68         notmuch_status_t status;
69         notmuch_tags_t *db_tags;
70         char *db_tags_str;
71
72         chomp_newline (line);
73
74         rerr = xregexec (&regex, line, 3, match, 0);
75         if (rerr == REG_NOMATCH)
76         {
77             fprintf (stderr, "Warning: Ignoring invalid input line: %s\n",
78                      line);
79             continue;
80         }
81
82         message_id = xstrndup (line + match[1].rm_so,
83                                match[1].rm_eo - match[1].rm_so);
84         file_tags = xstrndup (line + match[2].rm_so,
85                               match[2].rm_eo - match[2].rm_so);
86
87         message = notmuch_database_find_message (notmuch, message_id);
88         if (message == NULL) {
89             fprintf (stderr, "Warning: Cannot apply tags to missing message: %s\n",
90                      message_id);
91             goto NEXT_LINE;
92         }
93
94         db_tags_str = NULL;
95         for (db_tags = notmuch_message_get_tags (message);
96              notmuch_tags_valid (db_tags);
97              notmuch_tags_move_to_next (db_tags))
98         {
99             const char *tag = notmuch_tags_get (db_tags);
100
101             if (db_tags_str)
102                 db_tags_str = talloc_asprintf_append (db_tags_str, " %s", tag);
103             else
104                 db_tags_str = talloc_strdup (message, tag);
105         }
106
107         if (((file_tags == NULL || *file_tags == '\0') &&
108              (db_tags_str == NULL || *db_tags_str == '\0')) ||
109             (file_tags && db_tags_str && strcmp (file_tags, db_tags_str) == 0))
110         {
111             goto NEXT_LINE;
112         }
113
114         notmuch_message_freeze (message);
115         notmuch_message_remove_all_tags (message);
116
117         next = file_tags;
118         while (next) {
119             tag = strsep (&next, " ");
120             if (*tag == '\0')
121                 continue;
122             status = notmuch_message_add_tag (message, tag);
123             if (status) {
124                 fprintf (stderr,
125                          "Error applying tag %s to message %s:\n",
126                          tag, message_id);
127                 fprintf (stderr, "%s\n",
128                          notmuch_status_to_string (status));
129             }
130         }
131
132         notmuch_message_thaw (message);
133
134       NEXT_LINE:
135         if (message)
136             notmuch_message_destroy (message);
137         message = NULL;
138         free (message_id);
139         free (file_tags);
140     }
141
142     regfree (&regex);
143
144     if (line)
145         free (line);
146
147     notmuch_database_close (notmuch);
148     if (input != stdin)
149         fclose (input);
150
151     return 0;
152 }