Check for and throw away `gfont' eqn macros.

[mandoc.git] / out.c

diff --git a/out.c b/out.c
index 155957eae19b2d5e95a3410a0f3d2f35168bc4ed..eb679e6431fe78e58cbef217a06b06f4a6e4dfea 100644 (file)
--- a/out.c
+++ b/out.c
@@ -1,6 +1,7 @@
-/*     $Id: out.c,v 1.35 2011/01/11 14:12:01 kristaps Exp $ */
+/*     $Id: out.c,v 1.41 2011/07/17 15:24:25 kristaps Exp $ */
 /*
- * Copyright (c) 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -131,242 +132,6 @@ a2roffsu(const char *src, struct roffsu *dst, enum roffscale def)
        return(1);
 }
 
-
-/*
- * Correctly writes the time in nroff form, which differs from standard
- * form in that a space isn't printed in lieu of the extra %e field for
- * single-digit dates.
- */
-void
-time2a(time_t t, char *dst, size_t sz)
-{
-       struct tm        tm;
-       char             buf[5];
-       char            *p;
-       size_t           nsz;
-
-       assert(sz > 1);
-       localtime_r(&t, &tm);
-
-       p = dst;
-       nsz = 0;
-
-       dst[0] = '\0';
-
-       if (0 == (nsz = strftime(p, sz, "%B ", &tm)))
-               return;
-
-       p += (int)nsz;
-       sz -= nsz;
-
-       if (0 == strftime(buf, sizeof(buf), "%e, ", &tm))
-               return;
-
-       nsz = strlcat(p, buf + (' ' == buf[0] ? 1 : 0), sz);
-
-       if (nsz >= sz)
-               return;
-
-       p += (int)nsz;
-       sz -= nsz;
-
-       (void)strftime(p, sz, "%Y", &tm);
-}
-
-
-int
-a2roffdeco(enum roffdeco *d, const char **word, size_t *sz)
-{
-       int              i, j, lim;
-       char             term, c;
-       const char      *wp;
-       enum roffdeco    dd;
-
-       *d = DECO_NONE;
-       lim = i = 0;
-       term = '\0';
-       wp = *word;
-
-       switch ((c = wp[i++])) {
-       case ('('):
-               *d = DECO_SPECIAL;
-               lim = 2;
-               break;
-       case ('F'):
-               /* FALLTHROUGH */
-       case ('f'):
-               *d = 'F' == c ? DECO_FFONT : DECO_FONT;
-
-               switch (wp[i++]) {
-               case ('('):
-                       lim = 2;
-                       break;
-               case ('['):
-                       term = ']';
-                       break;
-               case ('3'):
-                       /* FALLTHROUGH */
-               case ('B'):
-                       *d = DECO_BOLD;
-                       return(i);
-               case ('2'):
-                       /* FALLTHROUGH */
-               case ('I'):
-                       *d = DECO_ITALIC;
-                       return(i);
-               case ('P'):
-                       *d = DECO_PREVIOUS;
-                       return(i);
-               case ('1'):
-                       /* FALLTHROUGH */
-               case ('R'):
-                       *d = DECO_ROMAN;
-                       return(i);
-               default:
-                       i--;
-                       lim = 1;
-                       break;
-               }
-               break;
-       case ('k'):
-               /* FALLTHROUGH */
-       case ('M'):
-               /* FALLTHROUGH */
-       case ('m'):
-               /* FALLTHROUGH */
-       case ('*'):
-               if ('*' == c)
-                       *d = DECO_RESERVED;
-
-               switch (wp[i++]) {
-               case ('('):
-                       lim = 2;
-                       break;
-               case ('['):
-                       term = ']';
-                       break;
-               default:
-                       i--;
-                       lim = 1;
-                       break;
-               }
-               break;
-       case ('h'):
-               /* FALLTHROUGH */
-       case ('v'):
-               /* FALLTHROUGH */
-       case ('s'):
-               j = 0;
-               if ('+' == wp[i] || '-' == wp[i]) {
-                       i++;
-                       j = 1;
-               }
-
-               switch (wp[i++]) {
-               case ('('):
-                       lim = 2;
-                       break;
-               case ('['):
-                       term = ']';
-                       break;
-               case ('\''):
-                       term = '\'';
-                       break;
-               case ('0'):
-                       j = 1;
-                       /* FALLTHROUGH */
-               default:
-                       i--;
-                       lim = 1;
-                       break;
-               }
-
-               if ('+' == wp[i] || '-' == wp[i]) {
-                       if (j)
-                               return(i);
-                       i++;
-               } 
-
-               /* Handle embedded numerical subexp or escape. */
-
-               if ('(' == wp[i]) {
-                       while (wp[i] && ')' != wp[i])
-                               if ('\\' == wp[i++]) {
-                                       /* Handle embedded escape. */
-                                       *word = &wp[i];
-                                       i += a2roffdeco(&dd, word, sz);
-                               }
-
-                       if (')' == wp[i++])
-                               break;
-
-                       *d = DECO_NONE;
-                       return(i - 1);
-               } else if ('\\' == wp[i]) {
-                       *word = &wp[++i];
-                       i += a2roffdeco(&dd, word, sz);
-               }
-
-               break;
-       case ('['):
-               *d = DECO_SPECIAL;
-               term = ']';
-               break;
-       case ('c'):
-               *d = DECO_NOSPACE;
-               return(i);
-       case ('z'):
-               *d = DECO_NONE;
-               if ('\\' == wp[i]) {
-                       *word = &wp[++i];
-                       return(i + a2roffdeco(&dd, word, sz));
-               } else
-                       lim = 1;
-               break;
-       case ('o'):
-               /* FALLTHROUGH */
-       case ('w'):
-               if ('\'' == wp[i++]) {
-                       term = '\'';
-                       break;
-               } 
-               /* FALLTHROUGH */
-       default:
-               *d = DECO_SSPECIAL;
-               i--;
-               lim = 1;
-               break;
-       }
-
-       assert(term || lim);
-       *word = &wp[i];
-
-       if (term) {
-               j = i;
-               while (wp[i] && wp[i] != term)
-                       i++;
-               if ('\0' == wp[i]) {
-                       *d = DECO_NONE;
-                       return(i);
-               }
-
-               assert(i >= j);
-               *sz = (size_t)(i - j);
-
-               return(i + 1);
-       }
-
-       assert(lim > 0);
-       *sz = (size_t)lim;
-
-       for (j = 0; wp[i] && j < lim; j++)
-               i++;
-       if (j < lim)
-               *d = DECO_NONE;
-
-       return(i);
-}
-
 /*
  * Calculate the abstract widths and decimal positions of columns in a
  * table.  This routine allocates the columns structures then runs over
@@ -387,7 +152,8 @@ tblcalc(struct rofftbl *tbl, const struct tbl_span *sp)
         */
 
        assert(NULL == tbl->cols);
-       tbl->cols = calloc(sp->tbl->cols, sizeof(struct roffcol));
+       tbl->cols = mandoc_calloc
+               ((size_t)sp->tbl->cols, sizeof(struct roffcol));
 
        hp = sp->head;
 
@@ -485,7 +251,7 @@ tblcalc_literal(struct rofftbl *tbl, struct roffcol *col,
        case (TBL_CELL_LONG):
                /* FALLTHROUGH */
        case (TBL_CELL_CENTRE):
-               bufsz = (*tbl->len)(2, tbl->arg);
+               bufsz = (*tbl->len)(1, tbl->arg);
                break;
        default:
                bufsz = (*tbl->len)(1, tbl->arg);