X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=sbr%2Ffmt_compile.c;h=bcd7b3d16b649b340fc4176fb7f304927270b449;hp=9d8f41d016d5dff1bff32315af21c68591d09f35;hb=714b5c530ece27ea2835a313013f5b770163403c;hpb=ced6090a330d3d83d0bce709f756aa3d7d65fea4 diff --git a/sbr/fmt_compile.c b/sbr/fmt_compile.c index 9d8f41d..bcd7b3d 100644 --- a/sbr/fmt_compile.c +++ b/sbr/fmt_compile.c @@ -189,7 +189,7 @@ static struct ftable functable[] = { static char *format_string; static unsigned char *usr_fstring; /* for CERROR */ -#define CERROR(str) compile_error (str, cp) +#define CERROR(str) compile_error(str, cp) /* ** external prototypes @@ -201,11 +201,11 @@ extern char *getusername(void); */ static struct ftable *lookup(char *); static void compile_error(char *, char *); -static char *compile (char *); +static char *compile(char *); static char *do_spec(char *); static char *do_name(char *, int); static char *do_func(char *); -static char *do_expr (char *, int); +static char *do_expr(char *, int); static char *do_loop(char *); static char *do_if(char *); @@ -218,7 +218,7 @@ lookup(char *name) register char c = *name; while ((nm = t->name)) { - if (*nm == c && strcmp (nm, name) == 0) + if (*nm == c && strcmp(nm, name) == 0) return (ftbl = t); t++; @@ -247,7 +247,7 @@ compile_error(char *str, char *cp) advise(NULL, "\"%s\": format compile error - %s", &usr_fstring[errpos-errctx], str); - adios (NULL, "%*s", errctx+1, "^"); + adios(NULL, "%*s", errctx+1, "^"); } /* @@ -263,8 +263,8 @@ fmt_compile(char *fstring, struct format **fmt) int i; if (format_string) - free (format_string); - format_string = getcpy (fstring); + free(format_string); + format_string = getcpy(fstring); usr_fstring = fstring; /* init the component hash table. */ @@ -283,10 +283,10 @@ fmt_compile(char *fstring, struct format **fmt) i = strlen(fstring)/2 + 1; if (i == 1) i++; - next_fp = formatvec = (struct format *)calloc ((size_t) i, + next_fp = formatvec = (struct format *)calloc((size_t) i, sizeof(struct format)); if (next_fp == NULL) - adios (NULL, "unable to allocate format storage"); + adios(NULL, "unable to allocate format storage"); ncomp = 0; infunction = 0; @@ -302,7 +302,7 @@ fmt_compile(char *fstring, struct format **fmt) } static char * -compile (char *sp) +compile(char *sp) { register char *cp = sp; register int c; @@ -327,7 +327,7 @@ compile (char *sp) switch (c = *++cp) { case '%': - PUTC (*cp); + PUTC(*cp); cp++; break; @@ -437,7 +437,7 @@ do_name(char *sp, int preprocess) case FT_MYMBOX: if (!primed) { - ismymbox ((struct mailname *) 0); + ismymbox((struct mailname *) 0); primed++; } /* fall through */ @@ -478,7 +478,7 @@ do_func(char *sp) CERROR("'(', '{', ' ' or ')' expected"); } cp[-1] = '\0'; - if ((t = lookup (sp)) == 0) { + if ((t = lookup(sp)) == 0) { CERROR("unknown function"); } if (isspace(c)) @@ -554,22 +554,22 @@ do_func(char *sp) } static char * -do_expr (char *sp, int preprocess) +do_expr(char *sp, int preprocess) { register char *cp = sp; register int c; if ((c = *cp++) == '{') { - cp = do_name (cp, preprocess); + cp = do_name(cp, preprocess); fp->f_type = FT_LS_COMP; } else if (c == '(') { - cp = do_func (cp); + cp = do_func(cp); } else if (c == ')') { return (--cp); } else if (c == '%' && *cp == '<') { - cp = do_if (cp+1); + cp = do_if(cp+1); } else { - CERROR ("'(', '{', '%<' or ')' expected"); + CERROR("'(', '{', '%<' or ')' expected"); } return (cp); } @@ -581,9 +581,9 @@ do_loop(char *sp) struct format *floop; floop = next_fp; - cp = compile (cp); + cp = compile(cp); if (*cp++ != ']') - CERROR ("']' expected"); + CERROR("']' expected"); LV(FT_DONE, 1); /* not yet done */ LV(FT_GOTO, 0); @@ -604,7 +604,7 @@ do_if(char *sp) if ((c = *cp++) == '{') /*}*/{ cp = do_name(cp, 0); fp->f_type = FT_LS_COMP; - LV (FT_IF_S, 0); + LV(FT_IF_S, 0); } else if (c == '(') { cp = do_func(cp); /* see if we can merge the load and the "if" */ @@ -617,9 +617,9 @@ do_if(char *sp) ** function 's return type is. */ if (ftbl->flags & TFL_PUTS) { - LV (FT_IF_S, 0); + LV(FT_IF_S, 0); } else { - LV (FT_IF_V_NE, 0); + LV(FT_IF_V_NE, 0); } } } else { @@ -628,7 +628,7 @@ do_if(char *sp) } fexpr = fp; /* loc of [ELS]IF */ - cp = compile (cp); /* compile IF TRUE stmts */ + cp = compile(cp); /* compile IF TRUE stmts */ if (fif) fif->f_skip = next_fp - fif; @@ -639,7 +639,7 @@ do_if(char *sp) fexpr = (struct format *)NULL;/* no extra ENDIF */ - cp = compile (cp); /* compile ELSE stmts */ + cp = compile(cp); /* compile ELSE stmts */ fif->f_skip = next_fp - fif; c = *cp++; } else if (c == '?') { /* another ELSIF */