f3b2b9b944320792c1f7693395934b5d136faebc
[mmh] / h / fmt_compile.h
1 /*
2  * fmt_compile.h -- format types
3  */
4
5 /* types that output text */
6 #define FT_COMP           1    /* the text of a component                 */
7 #define FT_COMPF          2    /* comp text, filled                       */
8 #define FT_LIT            3    /* literal text                            */
9 #define FT_LITF           4    /* literal text, filled                    */
10 #define FT_CHAR           5    /* a single ascii character                */
11 #define FT_NUM            6    /* "value" as decimal number               */
12 #define FT_NUMF           7    /* "value" as filled dec number            */
13 #define FT_STR            8    /* "str" as text                           */
14 #define FT_STRF           9    /* "str" as text, filled                   */
15 #define FT_STRFW         10    /* "str" as text, filled, width in "value" */
16 #define FT_PUTADDR       11    /* split and print address line            */
17
18 /* types that modify the "str" or "value" registers */
19 #define FT_LS_COMP       12    /* set "str" to component text          */
20 #define FT_LS_LIT        13    /* set "str" to literal text            */
21 #define FT_LS_GETENV     14    /* set "str" to getenv(text)            */
22 #define FT_LS_CFIND      15    /* set "str" to context_find(text)      */
23 #define FT_LS_DECODECOMP 16    /* set "str" to decoded component text  */
24 #define FT_LS_DECODE     17    /* decode "str" as RFC-2047 header      */
25 #define FT_LS_TRIM       18    /* trim trailing white space from "str" */
26 #define FT_LV_COMP       19    /* set "value" to comp (as dec. num)    */
27 #define FT_LV_COMPFLAG   20    /* set "value" to comp flag word        */
28 #define FT_LV_LIT        21    /* set "value" to literal num           */
29 #define FT_LV_DAT        22    /* set "value" to dat[n]                */
30 #define FT_LV_STRLEN     23    /* set "value" to length of "str"       */
31 #define FT_LV_PLUS_L     24    /* set "value" += literal               */
32 #define FT_LV_MINUS_L    25    /* set "value" -= literal               */
33 #define FT_LV_DIVIDE_L   26    /* set "value" to value / literal       */
34 #define FT_LV_MODULO_L   27    /* set "value" to value % literal       */
35 #define FT_LV_CHAR_LEFT  28    /* set "value" to char left in output   */
36
37 #define FT_LS_MONTH      29    /* set "str" to tws month                   */
38 #define FT_LS_LMONTH     30    /* set "str" to long tws month              */
39 #define FT_LS_ZONE       31    /* set "str" to tws timezone                */
40 #define FT_LS_DAY        32    /* set "str" to tws weekday                 */
41 #define FT_LS_WEEKDAY    33    /* set "str" to long tws weekday            */
42 #define FT_LS_822DATE    34    /* set "str" to 822 date str                */
43 #define FT_LS_PRETTY     35    /* set "str" to pretty (?) date str         */
44 #define FT_LV_SEC        36    /* set "value" to tws second                */
45 #define FT_LV_MIN        37    /* set "value" to tws minute                */
46 #define FT_LV_HOUR       38    /* set "value" to tws hour                  */
47 #define FT_LV_MDAY       39    /* set "value" to tws day of month          */
48 #define FT_LV_MON        40    /* set "value" to tws month                 */
49 #define FT_LV_YEAR       41    /* set "value" to tws year                  */
50 #define FT_LV_YDAY       42    /* set "value" to tws day of year           */
51 #define FT_LV_WDAY       43    /* set "value" to tws weekday               */
52 #define FT_LV_ZONE       44    /* set "value" to tws timezone              */
53 #define FT_LV_CLOCK      45    /* set "value" to tws clock                 */
54 #define FT_LV_RCLOCK     46    /* set "value" to now - tws clock           */
55 #define FT_LV_DAYF       47    /* set "value" to tws day flag              */
56 #define FT_LV_DST        48    /* set "value" to tws daylight savings flag */
57 #define FT_LV_ZONEF      49    /* set "value" to tws timezone flag         */
58
59 #define FT_LS_PERS       50    /* set "str" to person part of addr    */
60 #define FT_LS_MBOX       51    /* set "str" to mbox part of addr      */
61 #define FT_LS_HOST       52    /* set "str" to host part of addr      */
62 #define FT_LS_PATH       53    /* set "str" to route part of addr     */
63 #define FT_LS_GNAME      54    /* set "str" to group part of addr     */
64 #define FT_LS_NOTE       55    /* set "str" to comment part of addr   */
65 #define FT_LS_ADDR       56    /* set "str" to mbox@host              */
66 #define FT_LS_822ADDR    57    /* set "str" to 822 format addr        */
67 #define FT_LS_FRIENDLY   58    /* set "str" to "friendly" format addr */
68 #define FT_LV_HOSTTYPE   59    /* set "value" to addr host type       */
69 #define FT_LV_INGRPF     60    /* set "value" to addr in-group flag   */
70 #define FT_LS_UNQUOTE    61    /* remove RFC 2822 quotes from "str"   */
71 #define FT_LV_NOHOSTF    62    /* set "value" to addr no-host flag    */
72
73 /* Date Coercion */
74 #define FT_LOCALDATE     63    /* Coerce date to local timezone */
75 #define FT_GMTDATE       64    /* Coerce date to gmt            */
76
77 /* pre-format processing */
78 #define FT_PARSEDATE     65    /* parse comp into a date (tws) struct */
79 #define FT_PARSEADDR     66    /* parse comp into a mailaddr struct   */
80 #define FT_FORMATADDR    67    /* let external routine format addr    */
81 #define FT_MYMBOX        68    /* do "mymbox" test on comp            */
82
83 /* misc. */
84 /* ADDTOSEQ only works if you include "options LBL" */
85 #define FT_ADDTOSEQ      69    /* add current msg to a sequence       */
86
87 /* conditionals & control flow (must be last) */
88 #define FT_SAVESTR       70    /* save current str reg               */
89 #define FT_DONE          71    /* stop formatting                    */
90 #define FT_PAUSE         72    /* pause                              */
91 #define FT_NOP           73    /* nop                                */
92 #define FT_GOTO          74    /* (relative) goto                    */
93 #define FT_IF_S_NULL     75    /* test if "str" null                 */
94 #define FT_IF_S          76    /* test if "str" non-null             */
95 #define FT_IF_V_EQ       77    /* test if "value" = literal          */
96 #define FT_IF_V_NE       78    /* test if "value" != literal         */
97 #define FT_IF_V_GT       79    /* test if "value" > literal          */
98 #define FT_IF_MATCH      80    /* test if "str" contains literal     */
99 #define FT_IF_AMATCH     81    /* test if "str" starts with literal  */
100 #define FT_S_NULL        82    /* V = 1 if "str" null                */
101 #define FT_S_NONNULL     83    /* V = 1 if "str" non-null            */
102 #define FT_V_EQ          84    /* V = 1 if "value" = literal         */
103 #define FT_V_NE          85    /* V = 1 if "value" != literal        */
104 #define FT_V_GT          86    /* V = 1 if "value" > literal         */
105 #define FT_V_MATCH       87    /* V = 1 if "str" contains literal    */
106 #define FT_V_AMATCH      88    /* V = 1 if "str" starts with literal */
107
108 #define IF_FUNCS FT_S_NULL    /* start of "if" functions */