+ ** Read the standard profile setup
+ */
+ if ((fp = fopen(cp = etcpath("mhn.defaults"), "r"))) {
+ readconfig((struct node **) 0, fp, cp, 0);
+ fclose(fp);
+ }
+
+ /* Check for public cache location */
+ if ((cache_public = context_find(nmhcache)) && *cache_public != '/')
+ cache_public = NULL;
+
+ /* Check for private cache location */
+ if (!(cache_private = context_find(nmhprivcache)))
+ cache_private = ".cache";
+ cache_private = getcpy(toabsdir(cache_private));
+
+ /*
+ ** Check for storage directory. If specified,
+ ** then store temporary files there. Else we
+ ** store them in standard nmh directory.
+ */
+ if ((cp = context_find(nmhstorage)) && *cp)
+ tmp = concat(cp, "/", invo_name, NULL);
+ else
+ tmp = getcpy(toabsdir(invo_name));
+
+ if (file && msgs.size)
+ adios(NULL, "cannot specify msg and file at same time!");
+
+ /*
+ ** check if message is coming from file
+ */
+ if (file) {
+ if (!(cts = (CT *) calloc((size_t) 2, sizeof(*cts))))
+ adios(NULL, "out of memory");
+ ctp = cts;
+
+ if ((ct = parse_mime(file)))
+ *ctp++ = ct;
+ } else {
+ /*
+ ** message(s) are coming from a folder
+ */
+ if (!msgs.size)
+ app_msgarg(&msgs, seq_cur);
+ if (!folder)
+ folder = getcurfol();
+ maildir = toabsdir(folder);
+
+ if (chdir(maildir) == NOTOK)
+ adios(maildir, "unable to change directory to");
+
+ /* read folder and create message structure */
+ if (!(mp = folder_read(folder)))
+ adios(NULL, "unable to read folder %s", folder);
+
+ /* check for empty folder */
+ if (mp->nummsg == 0)
+ adios(NULL, "no messages in %s", folder);
+
+ /* parse all the message ranges/sequences and set SELECTED */
+ for (msgnum = 0; msgnum < msgs.size; msgnum++)
+ if (!m_convert(mp, msgs.msgs[msgnum]))
+ done(1);
+
+ /*
+ ** Set the SELECT_UNSEEN bit for all the SELECTED messages,
+ ** since we will use that as a tag to know which messages
+ ** to remove from the "unseen" sequence.
+ */
+ for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++)
+ if (is_selected(mp, msgnum))
+ set_unseen(mp, msgnum);
+
+ seq_setprev(mp); /* set the Previous-Sequence */
+ seq_setunseen(mp, 0); /* unset unseen seqs for shown msgs */
+
+ if (!(cts = (CT *) calloc((size_t) (mp->numsel + 1),
+ sizeof(*cts))))
+ adios(NULL, "out of memory");
+ ctp = cts;
+
+ /*
+ ** Parse all the SELECTED messages.
+ */
+ for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
+ if (is_selected(mp, msgnum)) {
+ char *msgnam;
+
+ msgnam = m_name(msgnum);
+ if ((ct = parse_mime(msgnam)))
+ *ctp++ = ct;
+ }
+ }
+ }