X("nodupaddrs", 0, NDUPADDRSW) \
X("ccme", 0, CCMESW) \
X("noccme", 0, NCCMESW) \
- X("normalize", 0, NORMSW) \
- X("nonormalize", 0, NNORMSW) \
X("outsize size-in-characters", 0, OUTSIZESW) \
- X("bufsize size-in-bytes", 0, BUFSZSW) \
X("width column-width", 0, WIDTHSW) \
X("msgnum number", 0, MSGNUMSW) \
X("msgcur flag", 0, MSGCURSW) \
static int lused = 0;
static int lallocated = 0;
-enum mode_t { MESSAGE, ADDRESS, RAW };
+enum mode_t { MESSAGE, ADDRESS, DATE, RAW };
#define DEFADDRFORMAT "%<{error}%{error}: %{text}%|%(putstr(proper{text}))%>"
#define DEFDATEFORMAT "%<(nodate{text})error: %{text}%|%(putstr(pretty{text}))%>"
static char *f_typestr(int);
static char *c_typestr(int);
static char *c_flagsstr(int);
-static void litputs(char *);
+static void litputs(const char *);
static void litputc(char);
-static void process_addresses(struct format *, struct msgs_array *, char *,
- int, int, int *, int, struct fmt_callbacks *);
-static void process_raw(struct format *, struct msgs_array *, char *,
- int, int, int *, struct fmt_callbacks *);
+static void process_addresses(struct format *, struct msgs_array *,
+ charstring_t, int, int *,
+ struct fmt_callbacks *);
+static void process_raw(struct format *, struct msgs_array *, charstring_t,
+ int, int *, struct fmt_callbacks *);
static void process_messages(struct format *, struct msgs_array *,
- struct msgs_array *, char *, char *, int,
- int, int, int *, struct fmt_callbacks *);
+ struct msgs_array *, charstring_t, char *, int,
+ int, int *, struct fmt_callbacks *);
static void process_single_file(FILE *, struct msgs_array *, int *, int,
- struct format *, char *, int, int,
+ struct format *, charstring_t, int,
struct fmt_callbacks *);
-static void test_trace(void *, struct format *, int, char *, char *);
+static void test_trace(void *, struct format *, int, char *, const char *);
static char *test_formataddr(char *, char *);
static char *test_concataddr(char *, char *);
static int insert(struct mailname *);
main (int argc, char **argv)
{
char *cp, *form = NULL, *format = NULL, *defformat = FORMAT, *folder = NULL;
- char buf[BUFSIZ], *nfs, **argp, **arguments, *buffer;
+ char buf[BUFSIZ], *nfs, **argp, **arguments;
+ charstring_t buffer;
struct format *fmt;
struct comp *cptr;
struct msgs_array msgs = { 0, 0, NULL }, compargs = { 0, 0, NULL};
int dump = 0, i;
- int outputsize = 0, bufsize = 0, dupaddrs = 1, trace = 0, files = 0;
+ int outputsize = 0, dupaddrs = 1, trace = 0, files = 0;
int colwidth = -1, msgnum = -1, msgcur = -1, msgsize = -1, msgunseen = -1;
- int normalize = AD_HOST;
enum mode_t mode = MESSAGE;
int dat[5];
struct fmt_callbacks cb, *cbp = 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;
if (!(cp = *argp++) || *cp == '-')
adios(NULL, "missing argument to %s", argp[-2]);
if (strcmp(cp, "max") == 0)
- outputsize = -1;
+ outputsize = INT_MAX;
else if (strcmp(cp, "width") == 0)
outputsize = sc_width();
else
outputsize = atoi(cp);
continue;
- case BUFSZSW:
- if (!(cp = *argp++) || *cp == '-')
- adios(NULL, "missing argument to %s", argp[-2]);
- bufsize = atoi(cp);
- continue;
case FORMSW:
if (!(form = *argp++) || *form == '-')
form = NULL;
continue;
- case NORMSW:
- normalize = AD_HOST;
- continue;
- case NNORMSW:
- normalize = AD_NHST;
- continue;
-
case TRACESW:
trace++;
continue;
dupaddrs = 0;
continue;
case DATESW:
- mode = RAW;
+ mode = DATE;
defformat = DEFDATEFORMAT;
continue;
}
}
- /*
- * If we don't specify a buffer size, allocate a default one.
- */
-
- if (bufsize == 0)
- bufsize = BUFSIZ;
-
- buffer = mh_xmalloc(bufsize);
+ buffer = charstring_create(BUFSIZ);
- if (outputsize < 0)
- outputsize = bufsize - 1; /* For the trailing NUL */
- else if (outputsize == 0) {
- if (mode == MESSAGE)
+ if (outputsize == 0) {
+ if (mode == MESSAGE)
outputsize = sc_width();
else
- outputsize = bufsize - 1;
+ outputsize = INT_MAX;
}
dat[0] = msgnum;
}
if (mode == MESSAGE) {
- process_messages(fmt, &compargs, &msgs, buffer, folder, bufsize,
- outputsize, files, dat, cbp);
+ process_messages(fmt, &compargs, &msgs, buffer, folder, outputsize,
+ files, dat, cbp);
} else {
if (compargs.size) {
for (i = 0; i < compargs.size; i += 2) {
}
if (mode == ADDRESS) {
- fmt_norm = normalize;
- process_addresses(fmt, &msgs, buffer, bufsize, outputsize,
- dat, normalize, cbp);
- } else
- process_raw(fmt, &msgs, buffer, bufsize, outputsize, dat, cbp);
+ process_addresses(fmt, &msgs, buffer, outputsize, dat, cbp);
+ } else /* Fall-through for RAW or DATE */
+ process_raw(fmt, &msgs, buffer, outputsize, dat, cbp);
}
+ charstring_free(buffer);
fmt_free(fmt, 1);
done(0);
};
static void
-process_addresses(struct format *fmt, struct msgs_array *addrs, char *buffer,
- int bufsize, int outwidth, int *dat, int norm,
+process_addresses(struct format *fmt, struct msgs_array *addrs,
+ charstring_t buffer, int outwidth, int *dat,
struct fmt_callbacks *cb)
{
int i;
while ((cp = getname(addrs->msgs[i]))) {
if ((p = (struct pqpair *) calloc ((size_t) 1, sizeof(*p))) == NULL)
adios (NULL, "unable to allocate pqpair memory");
- if ((mp = getm(cp, NULL, 0, norm, error)) == NULL) {
+ if ((mp = getm(cp, NULL, 0, error, sizeof(error))) == NULL) {
p->pq_text = getcpy(cp);
p->pq_error = getcpy(error);
} else {
p->pq_error = NULL;
}
- fmt_scan(fmt, buffer, bufsize, outwidth, dat, cb);
- fputs(buffer, stdout);
+ fmt_scan(fmt, buffer, outwidth, dat, cb);
+ fputs(charstring_buffer(buffer), stdout);
mlistfree();
if (p->pq_text)
static void
process_messages(struct format *fmt, struct msgs_array *comps,
- struct msgs_array *msgs, char *buffer, char *folder,
- int bufsize, int outwidth, int files, int *dat,
+ struct msgs_array *msgs, charstring_t buffer, char *folder,
+ int outwidth, int files, int *dat,
struct fmt_callbacks *cb)
{
int i, msgnum, msgsize = dat[2], num = dat[0], cur = dat[1];
if (files) {
for (i = 0; i < msgs->size; i++) {
if ((in = fopen(cp = msgs->msgs[i], "r")) == NULL) {
- admonish(cp, "unable to open file");
+ admonish(cp, "unable to open file");
continue;
}
process_single_file(in, comps, dat, msgsize, fmt, buffer,
- bufsize, outwidth, cb);
+ outwidth, cb);
}
return;
*/
process_single_file(in, comps, dat, msgsize, fmt, buffer,
- bufsize, outwidth, cb);
+ outwidth, cb);
}
}
static void
process_single_file(FILE *in, struct msgs_array *comps, int *dat, int msgsize,
- struct format *fmt, char *buffer, int bufsize,
- int outwidth, struct fmt_callbacks *cb)
+ struct format *fmt, charstring_t buffer, int outwidth,
+ struct fmt_callbacks *cb)
{
int i, state;
char name[NAMESZ], rbuf[BUFSIZ];
}
}
}
- fmt_scan(fmt, buffer, bufsize, outwidth, dat, cb);
- fputs(buffer, stdout);
+ fmt_scan(fmt, buffer, outwidth, dat, cb);
+ fputs(charstring_buffer (buffer), stdout);
mlistfree();
}
*/
static void
-process_raw(struct format *fmt, struct msgs_array *text, char *buffer,
- int bufsize, int outwidth, int *dat, struct fmt_callbacks *cb)
+process_raw(struct format *fmt, struct msgs_array *text, charstring_t buffer,
+ int outwidth, int *dat, struct fmt_callbacks *cb)
{
int i;
struct comp *c;
c->c_text = getcpy(text->msgs[i]);
}
- fmt_scan(fmt, buffer, bufsize, outwidth, dat, cb);
- fputs(buffer, stdout);
+ fmt_scan(fmt, buffer, outwidth, dat, cb);
+ fputs(charstring_buffer (buffer), stdout);
mlistfree();
}
}
*/
static void
-test_trace(void *context, struct format *fmt, int num, char *str, char *outbuf)
+test_trace(void *context, struct format *fmt, int num, char *str,
+ const char *outbuf)
{
struct trace_context *ctx = (struct trace_context *) context;
int changed = 0;
if (str != ctx->str) {
if (changed++)
printf(" ");
- printf("str=\"%s\"", str ? str : "NULL");
+ printf("str=");
+ litputs(str);
ctx->str = str;
}
printf("\n");
if (strcmp(outbuf, ctx->outbuf) != 0) {
- printf("outbuf=\"%s\"\n", outbuf);
+ printf("outbuf=");
+ litputs(outbuf);
+ putchar('\n');
free(ctx->outbuf);
ctx->outbuf = getcpy(outbuf);
}
}
}
-#define FNORD(v, s) if (t & (v)) { \
- if (i++ > 0) \
- strcat(buf, "|"); \
- strcat(buf, s); }
-
static char *
c_typestr(int t)
{
- register int i;
static char buf[64];
- buf[0] = '\0';
- if (t & ~(CT_ADDR|CT_DATE))
- printf(buf, "0x%x ", t);
- strcat(buf, "<");
- i = 0;
- FNORD(CT_ADDR, "ADDR");
- FNORD(CT_DATE, "DATE");
- strcat(buf, ">");
+ snprintb(buf, sizeof(buf), t, CT_BITS);
return(buf);
}
static char *
c_flagsstr(int t)
{
- register int i;
static char buf[64];
- buf[0] = '\0';
- if (t & ~(CF_TRUE|CF_PARSED|CF_DATEFAB|CF_TRIMMED))
- printf(buf, "0x%x ", t);
- strcat(buf, "<");
- i = 0;
- FNORD(CF_TRUE, "TRUE");
- FNORD(CF_PARSED, "PARSED");
- FNORD(CF_DATEFAB, "DATEFAB");
- FNORD(CF_TRIMMED, "TRIMMED");
- strcat(buf, ">");
+ snprintb(buf, sizeof(buf), t, CF_BITS);
return(buf);
}
-#undef FNORD
static void
-litputs(char *s)
+litputs(const char *s)
{
if (s) {
putc('"', stdout);
litputc(char c)
{
if (c & ~ 0177) {
- putc('M', stdout);
- putc('-', stdout);
- c &= 0177;
- }
- if (c < 0x20 || c == 0177) {
+ printf("\\x%02x", (unsigned char) c);
+ } else if (c < 0x20 || c == 0177) {
if (c == '\b') {
putc('\\', stdout);
putc('b', stdout);
/* concatenate all the new addresses onto 'buf' */
for (isgroup = 0; (cp = getname (str)); ) {
- if ((mp = getm (cp, NULL, 0, AD_NAME, error)) == NULL) {
+ if ((mp = getm (cp, NULL, 0, error, sizeof(error))) == NULL) {
fprintf(stderr, "bad address \"%s\" -- %s\n", cp, error);
continue;
}
projects / nmh / blobdiff