2 ** anno.c -- annotate messages
4 ** This code is Copyright (c) 2002, by the authors of nmh. See the
5 ** COPYRIGHT file in the root directory of the nmh distribution for
6 ** complete copyright information.
8 ** Three new options have been added: delete, list, and number.
9 ** Message header fields are used by the new MIME attachment code in
10 ** the send command. Adding features to generalize the anno command
11 ** seemed to be a better approach than the creation of a new command
12 ** whose features would overlap with those of the anno command.
14 ** The -delete option deletes header elements that match the -component
15 ** field name. If -delete is used without the -text option, the first
16 ** header field whose field name matches the component name is deleted.
17 ** If the -delete is used with the -text option, and the -text argument
18 ** begins with a /, the first header field whose field name matches the
19 ** component name and whose field body matches the text is deleted. If
20 ** the -text argument does not begin with a /, then the text is assumed
21 ** to be the last component of a path name, and the first header field
22 ** whose field name matches the component name and a field body whose
23 ** last path name component matches the text is deleted. If the -delete
24 ** option is used with the new -number option described below, the nth
25 ** header field whose field name matches the component name is deleted.
26 ** No header fields are deleted if none of the above conditions are met.
28 ** The -list option outputs the field bodies from each header field whose
29 ** field name matches the component name, one per line. If no -text
30 ** option is specified, only the last path name component of each field
31 ** body is output. The entire field body is output if the -text option
32 ** is used; the contents of the -text argument are ignored. If the -list
33 ** option is used in conjuction with the new -number option described
34 ** below, each line is numbered starting with 1. A tab separates the
35 ** number from the field body.
37 ** The -number option works with both the -delete and -list options as
38 ** described above. The -number option takes an optional argument. A
39 ** value of 1 is assumed if this argument is absent.
45 static struct swit switches[] = {
47 { "component field", 0 },
72 #define NOPRESERVESW 13
80 static void make_comp(unsigned char **);
84 main(int argc, char **argv)
86 int inplace = 1, datesw = 1;
89 unsigned char *comp = NULL;
90 char *text = NULL, *folder = NULL, buf[BUFSIZ];
91 char **argp, **arguments;
92 struct msgs_array msgs = { 0, 0, NULL };
94 int append = 0; /* append annotations instead of default prepend */
95 int delete = -2; /* delete header element if set */
96 int list = 0; /* list header elements if set */
97 int number = 0; /* delete specific number of like elements if set */
100 setlocale(LC_ALL, "");
102 invo_name = mhbasename(argv[0]);
104 /* read user profile/context */
107 arguments = getarguments(invo_name, argc, argv, 1);
110 while ((cp = *argp++)) {
112 switch (smatch(++cp, switches)) {
114 ambigsw(cp, switches);
117 adios(NULL, "-%s unknown", cp);
120 snprintf(buf, sizeof(buf), "%s [+folder] [msgs] [switches]",
122 print_help(buf, switches, 1);
125 print_version(invo_name);
130 adios(NULL, "only one component at a time!");
131 if (!(comp = *argp++) || *comp == '-')
132 adios(NULL, "missing argument to %s", argp[-2]);
151 adios(NULL, "only one body at a time!");
152 if (!(text = *argp++) || *text == '-')
153 adios(NULL, "missing argument to %s", argp[-2]);
156 case DELETESW: /* delete annotations */
160 case LISTSW: /* produce a listing */
164 case NUMBERSW: /* number listing or delete by number */
166 adios(NULL, "only one number at a time!");
168 if (argp - arguments == argc - 1 || **argp == '-')
172 if (strcmp(*argp, "all") == 0)
175 else if (!(number = atoi(*argp)))
176 adios(NULL, "missing argument to %s", argp[-2]);
184 case APPENDSW: /* append annotations instead of default prepend */
188 case PRESERVESW: /* preserve access and modification times on annotated message */
192 case NOPRESERVESW: /* don't preserve access and modification times on annotated message (default) */
197 if (*cp == '+' || *cp == '@') {
199 adios(NULL, "only one folder at a time!");
201 folder = pluspath(cp);
203 app_msgarg(&msgs, cp);
207 if (strcmp(invo_name, "fanno") == 0) /* ugh! */
211 if (!context_find("path"))
212 free(path("./", TFOLDER));
214 app_msgarg(&msgs, "cur");
216 folder = getfolder(FCUR);
217 maildir = m_maildir(folder);
219 if (chdir(maildir) == NOTOK)
220 adios(maildir, "unable to change directory to");
222 /* read folder and create message structure */
223 if (!(mp = folder_read(folder)))
224 adios(NULL, "unable to read folder %s", folder);
226 /* check for empty folder */
228 adios(NULL, "no messages in %s", folder);
230 /* parse all the message ranges/sequences and set SELECTED */
231 for (msgnum = 0; msgnum < msgs.size; msgnum++)
232 if (!m_convert(mp, msgs.msgs[msgnum]))
237 /* annotate all the SELECTED messages */
238 for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
239 if (is_selected(mp, msgnum)) {
241 annolist(m_name(msgnum), comp, text, number);
243 annotate(m_name(msgnum), comp, text, inplace, datesw, delete, append);
247 context_replace(pfolder, folder); /* update current folder */
248 seq_setcur(mp, mp->lowsel); /* update current message */
249 seq_save(mp); /* synchronize message sequences */
250 folder_free(mp); /* free folder/message structure */
251 context_save(); /* save the context file */
257 make_comp(unsigned char **ap)
259 register unsigned char *cp;
263 printf("Enter component name: ");
266 if (fgets(buffer, sizeof buffer, stdin) == NULL)
268 *ap = trimcpy(buffer);
271 if ((cp = *ap + strlen(*ap) - 1) > *ap && *cp == ':')
273 if (strlen(*ap) == 0)
274 adios(NULL, "null component name");
276 adios(NULL, "invalid component name %s", *ap);
277 if (strlen(*ap) >= NAMESZ)
278 adios(NULL, "too large component name %s", *ap);
280 for (cp = *ap; *cp; cp++)
281 if (!isalnum(*cp) && *cp != '-')
282 adios(NULL, "invalid component name %s", *ap);