#include <sys/types.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
#include <h/mh.h>
#include <h/crawl_folders.h>
#include <h/utils.h>
DEFINE_SWITCH_ARRAY(NEW, switches);
#undef X
-static enum { NEW, FNEXT, FPREV, UNSEEN } run_mode = NEW;
+/* What to do, based on argv[0]. */
+static enum {
+ RM_NEW,
+ RM_FNEXT,
+ RM_FPREV,
+ RM_UNSEEN
+} run_mode = RM_NEW;
/* check_folders uses this to maintain state with both .folders list of
* folders and with crawl_folders. */
static char *
get_msgnums(char *folder, char *sequences[])
{
- char *seqfile = concat(m_maildir(folder), "/", mh_seq, (void *)NULL);
- FILE *fp = fopen(seqfile, "r");
+ char *seqfile = NULL;
+ FILE *fp;
int state;
char name[NAMESZ], field[BUFSIZ];
char *cp;
char *msgnums = NULL, *this_msgnums, *old_msgnums;
+ int failed_to_lock = 0;
m_getfld_state_t gstate = 0;
- /* no sequences file -> no messages */
- if (fp == NULL) {
- return NULL;
+ /* copied from seq_read.c:seq_public */
+ /*
+ * If mh_seq == NULL or if *mh_seq == '\0' (the user has defined
+ * the "mh-sequences" profile entry, but left it empty),
+ * then just return, and do not initialize any public sequences.
+ */
+ if (mh_seq == NULL || *mh_seq == '\0')
+ return NULL;
+
+ /* get filename of sequence file */
+ seqfile = concat(m_maildir(folder), "/", mh_seq, (void *)NULL);
+
+ if (seqfile == NULL)
+ return NULL;
+
+ if ((fp = lkfopendata (seqfile, "r", & failed_to_lock)) == NULL) {
+
+ if (failed_to_lock) {
+ adios (seqfile, "failed to lock");
+ } else {
+ free(seqfile);
+ return NULL;
+ }
}
- /* copied from seq_read.c:seq_public */
+ /* Use m_getfld to scan sequence file */
for (;;) {
int fieldsz = sizeof field;
switch (state = m_getfld (&gstate, name, field, &fieldsz, fp)) {
case BODY:
adios (NULL, "no blank lines are permitted in %s", seqfile);
- /* fall */
+ /* FALLTHRU */
case FILEEOF:
break;
}
m_getfld_state_destroy (&gstate);
- fclose(fp);
+ lkfclosedata (fp, seqfile);
+
+ free(seqfile);
return msgnums;
}
if (is_cur || msgnums != NULL) {
if (*b->first == NULL) {
- *b->first = b->node = mh_xmalloc(sizeof(*b->node));
+ NEW(b->node);
+ *b->first = b->node;
} else {
- b->node->n_next = mh_xmalloc(sizeof(*b->node));
+ NEW(b->node->n_next);
b->node = b->node->n_next;
}
b->node->n_name = folder;
b.sequences = sequences;
if (folders == NULL) {
- chdir(m_maildir(""));
+ if (chdir(m_maildir("")) < 0) {
+ advise (m_maildir(""), "chdir");
+ }
crawl_folders(".", crawl_callback, &b);
} else {
fp = fopen(folders, "r");
while (vfgets(fp, &line) == OK) {
len = strlen(line) - 1;
line[len] = '\0';
- check_folder(getcpy(line), len, &b);
+ check_folder(mh_xstrdup(line), len, &b);
}
fclose(fp);
}
}
/* Return a struct node for the folder to change to. This is the next
- * (previous, if FPREV mode) folder with desired messages, or the current
- * folder if no folders have desired. If NEW or UNSEEN mode, print the
+ * (previous, if RM_FPREV mode) folder with desired messages, or the current
+ * folder if no folders have desired. If RM_NEW or RM_UNSEEN mode, print the
* output but don't change folders.
*
* n_name is the folder to change to, and n_field is the string list of
check_folders(&first, &last, &cur_node, &folder_len, cur,
folders, sequences);
- if (run_mode == FNEXT || run_mode == FPREV) {
+ if (run_mode == RM_FNEXT || run_mode == RM_FPREV) {
if (first == NULL) {
/* No folders at all... */
return NULL;
- } else if (first->n_next == NULL) {
+ }
+ if (first->n_next == NULL) {
/* We have only one node; any desired messages in it? */
if (first->n_field == NULL) {
return NULL;
- } else {
- return first;
}
- } else if (cur_node == NULL) {
+ return first;
+ }
+ if (cur_node == NULL) {
/* Current folder is not listed in .folders, return first. */
return first;
}
- } else if (run_mode == UNSEEN) {
+ } else if (run_mode == RM_UNSEEN) {
sequences_s = join_sequences(sequences);
}
for (node = first, prev = NULL;
node != NULL;
prev = node, node = node->n_next) {
- if (run_mode == FNEXT) {
+ if (run_mode == RM_FNEXT) {
/* If we have a previous node and it is the current
* folder, return this node. */
if (prev != NULL && strcmp(prev->n_name, cur) == 0) {
return node;
}
- } else if (run_mode == FPREV) {
+ } else if (run_mode == RM_FPREV) {
if (strcmp(node->n_name, cur) == 0) {
/* Found current folder in fprev mode; if we have a
* previous node in the list, return it; else return
}
return prev;
}
- } else if (run_mode == UNSEEN) {
+ } else if (run_mode == RM_UNSEEN) {
+ int status;
+
if (node->n_field == NULL) {
continue;
}
if (strcmp(node->n_name, cur) == 0) {
puts(" (*: current folder)");
} else {
- puts("");
+ putchar('\n');
}
fflush(stdout);
/* TODO: Split enough of scan.c out so that we can call it here. */
command = concat("scan +", node->n_name, " ", sequences_s,
(void *)NULL);
- system(command);
+ status = system(command);
+ if (! WIFEXITED (status)) {
+ adios (command, "system");
+ }
free(command);
} else {
if (node->n_field == NULL) {
/* If we're fnext, we haven't checked the last node yet. If it's the
* current folder, return the first node. */
- if (run_mode == FNEXT && strcmp(last->n_name, cur) == 0) {
- return first;
+ if (run_mode == RM_FNEXT) {
+ assert(last != NULL);
+ if (strcmp(last->n_name, cur) == 0) {
+ return first;
+ }
}
- if (run_mode == NEW) {
+ if (run_mode == RM_NEW) {
printf("%-*s %6d.\n", (int) folder_len, " total", total);
}
char **ap, *cp, **argp, **arguments;
char help[BUFSIZ];
char *folders = NULL;
- char *sequences[NUMATTRS + 1];
+ svector_t sequences = svector_create (0);
int i = 0;
char *unseen;
struct node *folder;
- sequences[0] = NULL;
- sequences[1] = NULL;
-
-#ifdef LOCALE
- setlocale(LC_ALL, "");
-#endif
- invo_name = r1bindex(argv[0], '/');
-
- /* read user profile/context */
- context_read();
+ if (nmh_init(argv[0], 1)) { return 1; }
arguments = getarguments (invo_name, argc, argv, 1);
argp = arguments;
}
}
/* have a sequence argument */
- if (!seq_in_list(cp, sequences)) {
- sequences[i++] = cp;
- sequences[i] = NULL;
+ if (!seq_in_list(cp, svector_strs (sequences))) {
+ svector_push_back (sequences, cp);
+ ++i;
}
}
if (strcmp(invo_name, "fnext") == 0) {
- run_mode = FNEXT;
+ run_mode = RM_FNEXT;
} else if (strcmp(invo_name, "fprev") == 0) {
- run_mode = FPREV;
+ run_mode = RM_FPREV;
} else if (strcmp(invo_name, "unseen") == 0) {
- run_mode = UNSEEN;
+ run_mode = RM_UNSEEN;
}
if (folders == NULL) {
adios(NULL, "must specify sequences or set %s", usequence);
}
for (ap = brkstring(unseen, " ", "\n"); *ap; ap++) {
- sequences[i++] = *ap;
+ svector_push_back (sequences, *ap);
+ ++i;
}
}
- sequences[i] = NULL;
- folder = doit(context_find(pfolder), folders, sequences);
+ folder = doit(context_find(pfolder), folders, svector_strs (sequences));
if (folder == NULL) {
done(0);
return 1;
}
- if (run_mode == UNSEEN) {
+ if (run_mode == RM_UNSEEN) {
/* All the scan(1)s it runs change the current folder, so we
* need to put it back. Unfortunately, context_replace lamely
* ignores the new value you give it if it is the same one it
/* update current folder */
context_replace(pfolder, folder->n_name);
- if (run_mode == FNEXT || run_mode == FPREV) {
+ if (run_mode == RM_FNEXT || run_mode == RM_FPREV) {
printf("%s %s\n", folder->n_name, folder->n_field);
}
context_save();
+ svector_free (sequences);
done (0);
return 1;
}