2 ** seq_read.c -- read the .mh_sequence file and
3 ** -- initialize sequence information
5 ** This code is Copyright (c) 2002, by the authors of nmh. See the
6 ** COPYRIGHT file in the root directory of the nmh distribution for
7 ** complete copyright information.
16 static int seq_init(struct msgs *, char *, char *);
17 static void seq_public(struct msgs *);
18 static void seq_private(struct msgs *);
22 ** Get the sequence information for this folder from
23 ** .mh_sequences (or equivalent specified in .mh_profile)
24 ** or context file (for private sequences).
28 seq_read(struct msgs *mp)
31 ** Initialize the list of sequence names. Go ahead and
32 ** add the cur sequence to the list of sequences.
34 mp->msgattrs[0] = getcpy(seq_cur);
35 mp->msgattrs[1] = NULL;
36 make_all_public(mp); /* initially, make all public */
38 /* If folder is empty, don't scan for sequence information */
42 /* Initialize the public sequences */
45 /* Initialize the private sequences */
51 ** read folder's sequences file for public sequences
55 seq_public(struct msgs *mp)
58 char *cp, seqfile[PATH_MAX];
59 char name[NAMESZ], field[BUFSIZ];
63 ** If public sequences are disabled (e.g. the user has defined
64 ** an empty `Mh-Sequences' profile entry), then just return.
66 if (mh_seq == NULL || *mh_seq == '\0')
69 /* get filename of sequence file */
70 snprintf(seqfile, sizeof(seqfile), "%s/%s", mp->foldpath, mh_seq);
72 if ((fp = lkfopen(seqfile, "r")) == NULL)
75 /* Use m_getfld to scan sequence file */
77 switch (state = m_getfld(state, name, field, sizeof(field),
82 if (state == FLDPLUS) {
84 while (state == FLDPLUS) {
85 state = m_getfld(state, name, field,
89 seq_init(mp, getcpy(name), trimcpy(cp));
92 seq_init(mp, getcpy(name), trimcpy(field));
100 adios(NULL, "no blank lines are permitted in %s",
108 adios(NULL, "%s is poorly formatted", seqfile);
110 break; /* break from for loop */
113 lkfclose(fp, seqfile);
118 ** Scan profile/context list for private sequences.
120 ** We search the context list for all keys that look like
121 ** "atr-seqname-folderpath", and add them as private sequences.
125 seq_private(struct msgs *mp)
127 int i, j, alen, plen;
131 alen = strlen("atr-");
132 plen = strlen(mp->foldpath) + 1;
134 for (np = m_defs; np; np = np->n_next) {
135 if (strncmp(np->n_name, "atr-", alen)==0 &&
136 (j = strlen(np->n_name) - plen) > alen &&
137 *(np->n_name + j) == '-' &&
138 strcmp(mp->foldpath, np->n_name + j + 1)==0) {
139 cp = getcpy(np->n_name + alen);
140 *(cp + j - alen) = '\0';
141 if ((i = seq_init(mp, cp, getcpy(np->n_field))) != -1)
142 make_seq_private(mp, i);
149 ** Add the name of sequence to the list of folder sequences.
150 ** Then parse the list of message ranges for this
151 ** sequence, and setup the various bit flags for each
152 ** message in the sequence.
154 ** Return internal index for the sequence if successful.
155 ** Return -1 on error.
159 seq_init(struct msgs *mp, char *name, char *field)
161 int i, j, k, is_current;
165 ** Check if this is the cur sequence,
166 ** so we can do some special things.
168 is_current = (strcmp(seq_cur, name)==0);
171 ** Search for this sequence name to see if we've seen
172 ** it already. If we've seen this sequence before,
173 ** then clear the bit for this sequence from all the
174 ** mesages in this folder.
176 for (i = 0; mp->msgattrs[i]; i++) {
177 if (strcmp(mp->msgattrs[i], name)==0) {
178 for (j = mp->lowmsg; j <= mp->hghmsg; j++)
179 clear_sequence(mp, i, j);
184 /* Return error, if too many sequences */
192 ** If we've already seen this sequence name, just free the
193 ** name string. Else add it to the list of sequence names.
195 if (mp->msgattrs[i]) {
198 mp->msgattrs[i] = name;
199 mp->msgattrs[i + 1] = NULL;
203 ** Split up the different message ranges at whitespace
205 for (ap = brkstring(field, " ", "\n"); *ap; ap++) {
206 if ((cp = strchr(*ap, '-')))
208 if ((j = m_atoi(*ap)) > 0) {
209 k = cp ? m_atoi(cp) : j;
212 ** Keep mp->curmsg and cur sequence in sync. Unlike
213 ** other sequences, this message doesn't need to exist.
214 ** Think about the series of command (rmm; next) to
215 ** understand why this can be the case. But if it does
216 ** exist, we will still set the bit flag for it like
222 ** We iterate through messages in this range
223 ** and flip on bit for this sequence.
225 for (; j <= k; j++) {
226 if (j >= mp->lowmsg && j <= mp->hghmsg &&
228 add_sequence(mp, i, j);
233 free(field); /* free string containing message ranges */