3 * fmt_scan.h -- definitions for fmt_scan()
7 * This structure describes an "interesting" component. It holds
8 * the name & text from the component (if found) and one piece of
9 * auxilary info. The structure for a particular component is located
10 * by (open) hashing the name and using it as an index into the ptr array
11 * "wantcomp". All format entries that reference a particular component
12 * point to its comp struct (so we only have to do component specific
13 * processing once. e.g., parse an address.).
16 char *c_name; /* component name (in lower case) */
17 char *c_text; /* component text (if found) */
18 struct comp *c_next; /* hash chain linkage */
19 short c_flags; /* misc. flags (from fmt_scan) */
20 short c_type; /* type info (from fmt_compile) */
23 struct mailname *c_u_mn;
27 #define c_tws c_un.c_u_tws
28 #define c_mn c_un.c_u_mn
33 #define CT_ADDR (1<<0) /* referenced as address */
34 #define CT_DATE (1<<1) /* referenced as date */
39 #define CF_TRUE (1<<0) /* usually means component is present */
40 #define CF_PARSED (1<<1) /* address/date has been parsed */
41 #define CF_DATEFAB (1<<2) /* datefield fabricated */
42 #define CF_TRIMMED (1<<3) /* Component has been trimmed */
47 * Hash table for deciding if a component is "interesting".
49 extern struct comp *wantcomp[128];
52 * Hash function for component name. The function should be
53 * case independent and probably shouldn't involve a routine
54 * call. This function is pretty good but will not work on
55 * single character component names.
57 #define CHASH(nm) (((((nm)[0]) - ((nm)[1])) & 0x1f) + (((nm)[2]) & 0x5f))
60 * Find a component in the hash table.
62 #define FINDCOMP(comp,name) \
63 for (comp = wantcomp[CHASH(name)]; \
64 comp && strcmp(comp->c_name,name); \
65 comp = comp->c_next) ;
68 * This structure defines one formatting instruction.
73 short f_width; /* output field width */
75 struct comp *f_u_comp; /* associated component */
76 char *f_u_text; /* literal text */
77 char f_u_char; /* literal character */
78 int f_u_value; /* literal value */
82 #define f_skip f_width /* instr to skip (false "if") */
84 #define f_comp f_un.f_u_comp
85 #define f_text f_un.f_u_text
86 #define f_char f_un.f_u_char
87 #define f_value f_un.f_u_value
92 struct format *fmt_scan (struct format *, char *, int, int *);
93 char *new_fs (char *, char *, char *);
94 int fmt_compile (char *, struct format **);
95 char *formataddr(char *, char *);
96 char *concataddr(char *, char *);
97 extern char *format_string;