3 * fmt_addr.c -- format an address field (from fmt_scan)
7 * This code is Copyright (c) 2002, by the authors of nmh. See the
8 * COPYRIGHT file in the root directory of the nmh distribution for
9 * complete copyright information.
13 #include <h/addrsbr.h>
14 #include <h/fmt_scan.h>
17 static char *buf; /* our current working buffer */
18 static char *bufend; /* end of working buffer */
19 static char *last_dst; /* buf ptr at end of last call */
20 static unsigned int bufsiz; /* current size of buf */
22 #define BUFINCR 512 /* how much to expand buf when if fills */
24 #define CPY(s) { cp = (s); while ((*dst++ = *cp++)) ; --dst; }
26 /* check if there's enough room in buf for str. add more mem if needed */
27 #define CHECKMEM(str) \
28 if ((len = strlen (str)) >= bufend - dst) {\
30 int n = last_dst - buf;\
31 bufsiz += ((dst + len - bufend) / BUFINCR + 1) * BUFINCR;\
32 buf = mh_xrealloc (buf, bufsiz);\
35 bufend = buf + bufsiz;\
39 /* fmt_scan will call this routine if the user includes the function
40 * "(formataddr {component})" in a format string. "orig" is the
41 * original contents of the string register. "str" is the address
42 * string to be formatted and concatenated onto orig. This routine
43 * returns a pointer to the concatenated address string.
45 * We try to not do a lot of malloc/copy/free's (which is why we
46 * don't call "getcpy") but still place no upper limit on the
47 * length of the result string.
49 * This routine is placed in a separate library so it can be
50 * overridden by particular programs (e.g., "replsbr").
54 formataddr (char *orig, char *str)
61 register struct mailname *mp = NULL;
63 /* if we don't have a buffer yet, get one */
65 buf = mh_xmalloc (BUFINCR);
66 last_dst = buf; /* XXX */
67 bufsiz = BUFINCR - 6; /* leave some slop */
68 bufend = buf + bufsiz;
71 * If "orig" points to our buffer we can just pick up where we
72 * left off. Otherwise we have to copy orig into our buffer.
76 else if (!orig || !*orig) {
80 dst = last_dst; /* XXX */
85 /* concatenate all the new addresses onto 'buf' */
86 for (isgroup = 0; (cp = getname (str)); ) {
87 if ((mp = getm (cp, NULL, 0, fmt_norm, NULL)) == NULL)
90 if (isgroup && (mp->m_gname || !mp->m_ingrp)) {
94 /* if we get here we're going to add an address */
100 CHECKMEM (mp->m_gname);