X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=uip%2Fscan.c;h=52a40afed902d4d79540831cf6e872095a1d8398;hp=077f824a2ba814f67d19b39549edfef056846e22;hb=a485ed478abbd599d8c9aab48934e7a26733ecb1;hpb=f480c03187724e54e5391ee61b810827da319a6c diff --git a/uip/scan.c b/uip/scan.c index 077f824..52a40af 100644 --- a/uip/scan.c +++ b/uip/scan.c @@ -1,4 +1,3 @@ - /* * scan.c -- display a one-line "scan" listing of folder or messages * @@ -16,31 +15,31 @@ #include static struct swit switches[] = { -#define CLRSW 0 - { "clear", 0 }, -#define NCLRSW 1 - { "noclear", 0 }, -#define FORMSW 2 - { "form formatfile", 0 }, -#define FMTSW 3 - { "format string", 5 }, -#define HEADSW 4 - { "header", 0 }, -#define NHEADSW 5 - { "noheader", 0 }, -#define WIDTHSW 6 - { "width columns", 0 }, -#define REVSW 7 - { "reverse", 0 }, -#define NREVSW 8 - { "noreverse", 0 }, -#define FILESW 9 - { "file file", 4 }, +#define CLRSW 0 + { "clear", 0 }, +#define NCLRSW 1 + { "noclear", 0 }, +#define FORMSW 2 + { "form formatfile", 0 }, +#define FMTSW 3 + { "format string", 5 }, +#define HEADSW 4 + { "header", 0 }, +#define NHEADSW 5 + { "noheader", 0 }, +#define WIDTHSW 6 + { "width columns", 0 }, +#define REVSW 7 + { "reverse", 0 }, +#define NREVSW 8 + { "noreverse", 0 }, +#define FILESW 9 + { "file file", 4 }, #define VERSIONSW 10 - { "version", 0 }, -#define HELPSW 11 - { "help", 0 }, - { NULL, 0 } + { "version", 0 }, +#define HELPSW 11 + { "help", 0 }, + { NULL, 0 } }; @@ -48,7 +47,7 @@ static struct swit switches[] = { * global for sbr/formatsbr.c - yech! */ #ifdef LBL -extern struct msgs *fmt_current_folder; +extern struct msgs *fmt_current_folder; #endif /* @@ -60,270 +59,270 @@ void clear_screen(void); /* from termsbr.c */ int main (int argc, char **argv) { - int clearflag = 0, hdrflag = 0, ontty; - int width = 0, revflag = 0; - int i, state, msgnum; - int seqnum[NUMATTRS], unseen, num_unseen_seq = 0; - char *cp, *maildir, *file = NULL, *folder = NULL; - char *form = NULL, *format = NULL, buf[BUFSIZ]; - char **argp, *nfs, **arguments; - struct msgs_array msgs = { 0, 0, NULL }; - struct msgs *mp; - FILE *in; + int clearflag = 0, hdrflag = 0, ontty; + int width = 0, revflag = 0; + int i, state, msgnum; + int seqnum[NUMATTRS], unseen, num_unseen_seq = 0; + char *cp, *maildir, *file = NULL, *folder = NULL; + char *form = NULL, *format = NULL, buf[BUFSIZ]; + char **argp, *nfs, **arguments; + struct msgs_array msgs = { 0, 0, NULL }; + struct msgs *mp; + FILE *in; #ifdef LOCALE - setlocale(LC_ALL, ""); + setlocale(LC_ALL, ""); #endif - invo_name = r1bindex (argv[0], '/'); - - /* read user profile/context */ - context_read(); - - mts_init (invo_name); - arguments = getarguments (invo_name, argc, argv, 1); - argp = arguments; - - /* - * Parse arguments - */ - while ((cp = *argp++)) { - if (*cp == '-') { - switch (smatch (++cp, switches)) { - case AMBIGSW: - ambigsw (cp, switches); - done (1); - case UNKWNSW: - adios (NULL, "-%s unknown", cp); - - case HELPSW: - snprintf (buf, sizeof(buf), "%s [+folder] [msgs] [switches]", - invo_name); - print_help (buf, switches, 1); - done (1); - case VERSIONSW: - print_version(invo_name); - done (1); - - case CLRSW: - clearflag++; - continue; - case NCLRSW: - clearflag = 0; - continue; - - case FORMSW: - if (!(form = *argp++) || *form == '-') - adios (NULL, "missing argument to %s", argp[-2]); - format = NULL; - continue; - case FMTSW: - if (!(format = *argp++) || *format == '-') - adios (NULL, "missing argument to %s", argp[-2]); - form = NULL; - continue; - - case HEADSW: - hdrflag++; - continue; - case NHEADSW: - hdrflag = 0; - continue; - - case WIDTHSW: - if (!(cp = *argp++) || *cp == '-') - adios (NULL, "missing argument to %s", argp[-2]); - width = atoi (cp); - continue; - case REVSW: - revflag++; - continue; - case NREVSW: - revflag = 0; - continue; - - case FILESW: - if (!(cp = *argp++) || (cp[0] == '-' && cp[1])) - adios (NULL, "missing argument to %s", argp[-2]); - if (strcmp (file = cp, "-")) - file = path (cp, TFILE); - continue; - } - } - if (*cp == '+' || *cp == '@') { - if (folder) - adios (NULL, "only one folder at a time!"); - else - folder = pluspath (cp); - } else - app_msgarg(&msgs, cp); - } - - if (!context_find ("path")) - free (path ("./", TFOLDER)); - - /* - * Get new format string. Must be before chdir(). - */ - nfs = new_fs (form, format, FORMAT); - - /* - * We are scanning a maildrop file - */ - if (file) { - if (msgs.size) - adios (NULL, "\"msgs\" not allowed with -file"); - if (folder) - adios (NULL, "\"+folder\" not allowed with -file"); - - /* check if "file" is really stdin */ - if (strcmp (file, "-") == 0) { - in = stdin; - file = "stdin"; - } else { - if ((in = fopen (file, "r")) == NULL) - adios (file, "unable to open"); + invo_name = r1bindex (argv[0], '/'); + + /* read user profile/context */ + context_read(); + + mts_init (invo_name); + arguments = getarguments (invo_name, argc, argv, 1); + argp = arguments; + + /* + * Parse arguments + */ + while ((cp = *argp++)) { + if (*cp == '-') { + switch (smatch (++cp, switches)) { + case AMBIGSW: + ambigsw (cp, switches); + done (1); + case UNKWNSW: + adios (NULL, "-%s unknown", cp); + + case HELPSW: + snprintf (buf, sizeof(buf), "%s [+folder] [msgs] [switches]", + invo_name); + print_help (buf, switches, 1); + done (1); + case VERSIONSW: + print_version(invo_name); + done (1); + + case CLRSW: + clearflag++; + continue; + case NCLRSW: + clearflag = 0; + continue; + + case FORMSW: + if (!(form = *argp++) || *form == '-') + adios (NULL, "missing argument to %s", argp[-2]); + format = NULL; + continue; + case FMTSW: + if (!(format = *argp++) || *format == '-') + adios (NULL, "missing argument to %s", argp[-2]); + form = NULL; + continue; + + case HEADSW: + hdrflag++; + continue; + case NHEADSW: + hdrflag = 0; + continue; + + case WIDTHSW: + if (!(cp = *argp++) || *cp == '-') + adios (NULL, "missing argument to %s", argp[-2]); + width = atoi (cp); + continue; + case REVSW: + revflag++; + continue; + case NREVSW: + revflag = 0; + continue; + + case FILESW: + if (!(cp = *argp++) || (cp[0] == '-' && cp[1])) + adios (NULL, "missing argument to %s", argp[-2]); + if (strcmp (file = cp, "-")) + file = path (cp, TFILE); + continue; + } + } + if (*cp == '+' || *cp == '@') { + if (folder) + adios (NULL, "only one folder at a time!"); + else + folder = pluspath (cp); + } else + app_msgarg(&msgs, cp); } -#ifndef JLR - if (hdrflag) { - printf ("FOLDER %s\t%s\n", file, dtimenow (1)); - } + if (!context_find ("path")) + free (path ("./", TFOLDER)); + + /* + * Get new format string. Must be before chdir(). + */ + nfs = new_fs (form, format, FORMAT); + + /* + * We are scanning a maildrop file + */ + if (file) { + if (msgs.size) + adios (NULL, "\"msgs\" not allowed with -file"); + if (folder) + adios (NULL, "\"+folder\" not allowed with -file"); + + /* check if "file" is really stdin */ + if (strcmp (file, "-") == 0) { + in = stdin; + file = "stdin"; + } else { + if ((in = fopen (file, "r")) == NULL) + adios (file, "unable to open"); + } + +#ifndef JLR + if (hdrflag) { + printf ("FOLDER %s\t%s\n", file, dtimenow (1)); + } #endif /* JLR */ - m_unknown (in); - for (msgnum = 1; ; ++msgnum) { - state = scan (in, msgnum, -1, nfs, width, 0, 0, - hdrflag ? file : NULL, 0L, 1); - if (state != SCNMSG && state != SCNENC) - break; + m_unknown (in); + for (msgnum = 1; ; ++msgnum) { + state = scan (in, msgnum, -1, nfs, width, 0, 0, + hdrflag ? file : NULL, 0L, 1); + if (state != SCNMSG && state != SCNENC) + break; + } + fclose (in); + done (0); } - fclose (in); - done (0); - } - - /* - * We are scanning a folder - */ - - if (!msgs.size) - app_msgarg(&msgs, "all"); - if (!folder) - folder = getfolder (1); - maildir = m_maildir (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); - seq_setprev (mp); /* set the Previous-Sequence */ - - context_replace (pfolder, folder); /* update current folder */ - seq_save (mp); /* synchronize message sequences */ - context_save (); /* save the context file */ - - /* - * Get the sequence number for each sequence - * specified by Unseen-Sequence - */ - if ((cp = context_find (usequence)) && *cp) { - char **ap, *dp; - - dp = getcpy(cp); - ap = brkstring (dp, " ", "\n"); - for (i = 0; ap && *ap; i++, ap++) - seqnum[i] = seq_getnum (mp, *ap); - - num_unseen_seq = i; - if (dp) - free(dp); - } - - ontty = isatty (fileno (stdout)); + + /* + * We are scanning a folder + */ + + if (!msgs.size) + app_msgarg(&msgs, "all"); + if (!folder) + folder = getfolder (1); + maildir = m_maildir (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); + seq_setprev (mp); /* set the Previous-Sequence */ + + context_replace (pfolder, folder); /* update current folder */ + seq_save (mp); /* synchronize message sequences */ + context_save (); /* save the context file */ + + /* + * Get the sequence number for each sequence + * specified by Unseen-Sequence + */ + if ((cp = context_find (usequence)) && *cp) { + char **ap, *dp; + + dp = getcpy(cp); + ap = brkstring (dp, " ", "\n"); + for (i = 0; ap && *ap; i++, ap++) + seqnum[i] = seq_getnum (mp, *ap); + + num_unseen_seq = i; + if (dp) + free(dp); + } + + ontty = isatty (fileno (stdout)); #ifdef LBL - else - fmt_current_folder = mp; + else + fmt_current_folder = mp; #endif - for (msgnum = revflag ? mp->hghsel : mp->lowsel; - (revflag ? msgnum >= mp->lowsel : msgnum <= mp->hghsel); - msgnum += (revflag ? -1 : 1)) { - if (is_selected(mp, msgnum)) { - if ((in = fopen (cp = m_name (msgnum), "r")) == NULL) { + for (msgnum = revflag ? mp->hghsel : mp->lowsel; + (revflag ? msgnum >= mp->lowsel : msgnum <= mp->hghsel); + msgnum += (revflag ? -1 : 1)) { + if (is_selected(mp, msgnum)) { + if ((in = fopen (cp = m_name (msgnum), "r")) == NULL) { #if 0 - if (errno != EACCES) + if (errno != EACCES) #endif - admonish (cp, "unable to open message"); + admonish (cp, "unable to open message"); #if 0 - else - printf ("%*d unreadable\n", DMAXFOLDER, msgnum); + else + printf ("%*d unreadable\n", DMAXFOLDER, msgnum); #endif - continue; - } + continue; + } #ifndef JLR - if (hdrflag) { - printf ("FOLDER %s\t%s\n", folder, dtimenow(1)); - } + if (hdrflag) { + printf ("FOLDER %s\t%s\n", folder, dtimenow(1)); + } #endif /* JLR */ - /* - * Check if message is in any sequence given - * by Unseen-Sequence profile entry. - */ - unseen = 0; - for (i = 0; i < num_unseen_seq; i++) { - if (in_sequence(mp, seqnum[i], msgnum)) { - unseen = 1; - break; - } - } - - switch (state = scan (in, msgnum, 0, nfs, width, - msgnum == mp->curmsg, unseen, - folder, 0L, 1)) { - case SCNMSG: - case SCNENC: - case SCNERR: - break; - - default: - adios (NULL, "scan() botch (%d)", state); - - case SCNEOF: + /* + * Check if message is in any sequence given + * by Unseen-Sequence profile entry. + */ + unseen = 0; + for (i = 0; i < num_unseen_seq; i++) { + if (in_sequence(mp, seqnum[i], msgnum)) { + unseen = 1; + break; + } + } + + switch (state = scan (in, msgnum, 0, nfs, width, + msgnum == mp->curmsg, unseen, + folder, 0L, 1)) { + case SCNMSG: + case SCNENC: + case SCNERR: + break; + + default: + adios (NULL, "scan() botch (%d)", state); + + case SCNEOF: #if 0 - printf ("%*d empty\n", DMAXFOLDER, msgnum); + printf ("%*d empty\n", DMAXFOLDER, msgnum); #else - advise (NULL, "message %d: empty", msgnum); + advise (NULL, "message %d: empty", msgnum); #endif - break; - } - hdrflag = 0; - fclose (in); - if (ontty) - fflush (stdout); + break; + } + hdrflag = 0; + fclose (in); + if (ontty) + fflush (stdout); + } } - } #ifdef LBL - seq_save (mp); /* because formatsbr might have made changes */ + seq_save (mp); /* because formatsbr might have made changes */ #endif - folder_free (mp); /* free folder/message structure */ - if (clearflag) - clear_screen (); + folder_free (mp); /* free folder/message structure */ + if (clearflag) + clear_screen (); - done (0); - return 1; + done (0); + return 1; }