3 * anno.c -- annotate messages
7 * This code is Copyright (c) 2002, by the authors of nmh. See the
8 * COPYRIGHT file in the root directory of the nmh distribution for
9 * complete copyright information.
11 * Four new options have been added: delete, list, number, and draft.
12 * Message header fields are used by the new MIME attachment code in
13 * the send command. Adding features to generalize the anno command
14 * seemed to be a better approach than the creation of a new command
15 * whose features would overlap with those of the anno command.
17 * The -draft option causes anno to operate on the current draft file
18 * instead of on a message sequence.
20 * The -delete option deletes header elements that match the -component
21 * field name. If -delete is used without the -text option, the first
22 * header field whose field name matches the component name is deleted.
23 * If the -delete is used with the -text option, and the -text argument
24 * begins with a /, the first header field whose field name matches the
25 * component name and whose field body matches the text is deleted. If
26 * the -text argument does not begin with a /, then the text is assumed
27 * to be the last component of a path name, and the first header field
28 * whose field name matches the component name and a field body whose
29 * last path name component matches the text is deleted. If the -delete
30 * option is used with the new -number option described below, the nth
31 * header field whose field name matches the component name is deleted.
32 * No header fields are deleted if none of the above conditions are met.
34 * The -list option outputs the field bodies from each header field whose
35 * field name matches the component name, one per line. If no -text
36 * option is specified, only the last path name component of each field
37 * body is output. The entire field body is output if the -text option
38 * is used; the contents of the -text argument are ignored. If the -list
39 * option is used in conjuction with the new -number option described
40 * below, each line is numbered starting with 1. A tab separates the
41 * number from the field body.
43 * The -number option works with both the -delete and -list options as
44 * described above. The -number option takes an optional argument. A
45 * value of 1 is assumed if this argument is absent.
51 static struct swit switches[] = {
53 { "component field", 0 },
80 #define NOPRESERVESW 14
88 static void make_comp (char **);
92 main (int argc, char **argv)
94 int inplace = 1, datesw = 1;
96 char *cp, *maildir, *comp = NULL;
97 char *text = NULL, *folder = NULL, buf[BUFSIZ];
98 char **argp, **arguments;
99 struct msgs_array msgs = { 0, 0, NULL };
101 int append = 0; /* append annotations instead of default prepend */
102 int delete = -2; /* delete header element if set */
103 char *draft = (char *)0; /* draft file name */
104 int isdf = 0; /* return needed for m_draft() */
105 int list = 0; /* list header elements if set */
106 int number = 0; /* delete specific number of like elements if set */
109 setlocale(LC_ALL, "");
111 invo_name = r1bindex (argv[0], '/');
113 /* read user profile/context */
116 arguments = getarguments (invo_name, argc, argv, 1);
119 while ((cp = *argp++)) {
121 switch (smatch (++cp, switches)) {
123 ambigsw (cp, switches);
126 adios (NULL, "-%s unknown", cp);
129 snprintf (buf, sizeof(buf), "%s [+folder] [msgs] [switches]",
131 print_help (buf, switches, 1);
134 print_version(invo_name);
139 adios (NULL, "only one component at a time!");
140 if (!(comp = *argp++) || *comp == '-')
141 adios (NULL, "missing argument to %s", argp[-2]);
160 adios (NULL, "only one body at a time!");
161 if (!(text = *argp++) || *text == '-')
162 adios (NULL, "missing argument to %s", argp[-2]);
165 case DELETESW: /* delete annotations */
169 case DRFTSW: /* draft message specified */
173 case LISTSW: /* produce a listing */
177 case NUMBERSW: /* number listing or delete by number */
179 adios (NULL, "only one number at a time!");
181 if (argp - arguments == argc - 1 || **argp == '-')
185 if (strcmp(*argp, "all") == 0)
188 else if (!(number = atoi(*argp)))
189 adios (NULL, "missing argument to %s", argp[-2]);
197 case APPENDSW: /* append annotations instead of default prepend */
201 case PRESERVESW: /* preserve access and modification times on annotated message */
205 case NOPRESERVESW: /* don't preserve access and modification times on annotated message (default) */
210 if (*cp == '+' || *cp == '@') {
212 adios (NULL, "only one folder at a time!");
214 folder = pluspath (cp);
216 app_msgarg(&msgs, cp);
220 * We're dealing with the draft message instead of message numbers.
221 * Get the name of the draft and deal with it just as we do with
222 * message numbers below.
225 if (draft != (char *)0) {
227 adios(NULL, "can only have message numbers or -draft.");
229 draft = getcpy(m_draft(folder, (char *)0, 1, &isdf));
234 annolist(draft, comp, text, number);
236 annotate (draft, comp, text, inplace, datesw, delete, append);
242 if (strcmp(invo_name, "fanno") == 0) /* ugh! */
246 if (!context_find ("path"))
247 free (path ("./", TFOLDER));
249 app_msgarg(&msgs, "cur");
251 folder = getfolder (1);
252 maildir = m_maildir (folder);
254 if (chdir (maildir) == NOTOK)
255 adios (maildir, "unable to change directory to");
257 /* read folder and create message structure */
258 if (!(mp = folder_read (folder)))
259 adios (NULL, "unable to read folder %s", folder);
261 /* check for empty folder */
263 adios (NULL, "no messages in %s", folder);
265 /* parse all the message ranges/sequences and set SELECTED */
266 for (msgnum = 0; msgnum < msgs.size; msgnum++)
267 if (!m_convert (mp, msgs.msgs[msgnum]))
272 /* annotate all the SELECTED messages */
273 for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
274 if (is_selected(mp, msgnum)) {
276 annolist(m_name(msgnum), comp, text, number);
278 annotate (m_name (msgnum), comp, text, inplace, datesw, delete, append);
282 context_replace (pfolder, folder); /* update current folder */
283 seq_setcur (mp, mp->lowsel); /* update current message */
284 seq_save (mp); /* synchronize message sequences */
285 folder_free (mp); /* free folder/message structure */
286 context_save (); /* save the context file */
291 make_comp (char **ap)
297 printf ("Enter component name: ");
300 if (fgets (buffer, sizeof buffer, stdin) == NULL)
302 *ap = trimcpy (buffer);
305 if ((cp = *ap + strlen (*ap) - 1) > *ap && *cp == ':')
307 if (strlen (*ap) == 0)
308 adios (NULL, "null component name");
310 adios (NULL, "invalid component name %s", *ap);
311 if (strlen (*ap) >= NAMESZ)
312 adios (NULL, "too large component name %s", *ap);
314 for (cp = *ap; *cp; cp++)
315 if (!isalnum (*cp) && *cp != '-')
316 adios (NULL, "invalid component name %s", *ap);