recognize ".if n" as true;

[mandoc.git] / term.c

diff --git a/term.c b/term.c
index e43d9692912da8c88882a3b0be068324ceb54c98..b4beb633bcdd1fef151b07cf3f03834884b80a22 100644 (file)
--- a/term.c
+++ b/term.c
@@ -1,4 +1,4 @@
-/*     $Id: term.c,v 1.134 2010/05/15 16:18:23 joerg Exp $ */
+/*     $Id: term.c,v 1.139 2010/05/24 21:51:20 schwarze Exp $ */
 /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -27,6 +27,7 @@
 #include <string.h>
 #include <time.h>
 
+#include "mandoc.h"
 #include "chars.h"
 #include "out.h"
 #include "term.h"
@@ -83,6 +84,7 @@ term_alloc(enum termenc enc, size_t width)
                perror(NULL);
                exit(EXIT_FAILURE);
        }
+       p->tabwidth = 5;
        p->enc = enc;
        /* Enforce some lower boundary. */
        if (width < 60)
@@ -133,7 +135,7 @@ term_flushln(struct termp *p)
        int              i;     /* current input position in p->buf */
        size_t           vis;   /* current visual position on output */
        size_t           vbl;   /* number of blanks to prepend to output */
-       size_t           vsz;   /* visual characters to write to output */
+       size_t           vend;  /* end of word visual position on output */
        size_t           bp;    /* visual right border position */
        int              j;     /* temporary loop index */
        size_t           maxvis, mmax;
@@ -156,25 +158,30 @@ term_flushln(struct termp *p)
 
        bp = TERMP_NOBREAK & p->flags ? mmax : maxvis;
 
+       /*
+        * Indent the first line of a paragraph.
+        */
+       vbl = p->flags & TERMP_NOLPAD ? 0 : p->offset;
+
        /* 
         * FIXME: if bp is zero, we still output the first word before
         * breaking the line.
         */
 
-       vis = 0;
+       vis = vend = i = 0;
+       while (i < (int)p->col) {
 
-       /*
-        * If in the standard case (left-justified), then begin with our
-        * indentation, otherwise (columns, etc.) just start spitting
-        * out text.
-        */
-
-       if ( ! (p->flags & TERMP_NOLPAD))
-               /* LINTED */
-               for (j = 0; j < (int)p->offset; j++)
-                       putchar(' ');
+               /*
+                * Handle literal tab characters.
+                */
+               for (j = i; j < (int)p->col; j++) {
+                       if ('\t' != p->buf[j])
+                               break;
+                       vend = (vis/p->tabwidth+1)*p->tabwidth;
+                       vbl += vend - vis;
+                       vis = vend;
+               }
 
-       for (i = 0; i < (int)p->col; i++) {
                /*
                 * Count up visible word characters.  Control sequences
                 * (starting with the CSI) aren't counted.  A space
@@ -183,39 +190,30 @@ term_flushln(struct termp *p)
                 */
 
                /* LINTED */
-               for (j = i, vsz = 0; j < (int)p->col; j++) {
-                       if (j && ' ' == p->buf[j]) 
+               for ( ; j < (int)p->col; j++) {
+                       if ((j && ' ' == p->buf[j]) || '\t' == p->buf[j])
                                break;
                        if (8 == p->buf[j])
-                               vsz--;
+                               vend--;
                        else
-                               vsz++;
+                               vend++;
                }
 
-               /*
-                * Choose the number of blanks to prepend: no blank at the
-                * beginning of a line, one between words -- but do not
-                * actually write them yet.
-                */
-
-               vbl = (size_t)(0 == vis ? 0 : 1);
-
                /*
                 * Find out whether we would exceed the right margin.
-                * If so, break to the next line.  Otherwise, write the chosen
-                * number of blanks.
+                * If so, break to the next line.
                 */
-
-               if (vis && vis + vbl + vsz > bp) {
+               if (vend > bp && vis > 0) {
+                       vend -= vis;
                        putchar('\n');
                        if (TERMP_NOBREAK & p->flags) {
+                               p->viscol = p->rmargin;
                                for (j = 0; j < (int)p->rmargin; j++)
                                        putchar(' ');
-                               vis = p->rmargin - p->offset;
+                               vend += p->rmargin - p->offset;
                        } else {
-                               for (j = 0; j < (int)p->offset; j++)
-                                       putchar(' ');
-                               vis = 0;
+                               p->viscol = 0;
+                               vbl = p->offset;
                        }
 
                        /* Remove the p->overstep width. */
@@ -223,28 +221,53 @@ term_flushln(struct termp *p)
                        bp += (int)/* LINTED */
                                p->overstep;
                        p->overstep = 0;
-               } else {
-                       for (j = 0; j < (int)vbl; j++)
-                               putchar(' ');
-                       vis += vbl;
                }
 
+               /*
+                * Skip leading tabs, they were handled above.
+                */
+               while (i < (int)p->col && '\t' == p->buf[i])
+                       i++;
+
                /* Write out the [remaining] word. */
-               for ( ; i < (int)p->col; i++)
-                       if (' ' == p->buf[i])
+               for ( ; i < (int)p->col; i++) {
+                       if ('\t' == p->buf[i])
                                break;
-                       else if (31 == p->buf[i])
-                               putchar(' ');
-                       else
-                               putchar(p->buf[i]);
+                       if (' ' == p->buf[i]) {
+                               while (' ' == p->buf[i]) {
+                                       vbl++;
+                                       i++;
+                               }
+                               break;
+                       }
+                       if (ASCII_NBRSP == p->buf[i]) {
+                               vbl++;
+                               continue;
+                       }
 
-               vis += vsz;
+                       /*
+                        * Now we definitely know there will be
+                        * printable characters to output,
+                        * so write preceding white space now.
+                        */
+                       if (vbl) {
+                               for (j = 0; j < (int)vbl; j++)
+                                       putchar(' ');
+                               p->viscol += vbl;
+                               vbl = 0;
+                       }
+                       putchar(p->buf[i]);
+                       p->viscol += 1;
+               }
+               vend += vbl;
+               vis = vend;
        }
 
        p->col = 0;
        p->overstep = 0;
 
        if ( ! (TERMP_NOBREAK & p->flags)) {
+               p->viscol = 0;
                putchar('\n');
                return;
        }
@@ -276,11 +299,13 @@ term_flushln(struct termp *p)
 
        /* Right-pad. */
        if (maxvis > vis + /* LINTED */
-                       ((TERMP_TWOSPACE & p->flags) ? 1 : 0))  
+                       ((TERMP_TWOSPACE & p->flags) ? 1 : 0)) {
+               p->viscol += maxvis - vis;
                for ( ; vis < maxvis; vis++)
                        putchar(' ');
-       else {  /* ...or newline break. */
+       } else {        /* ...or newline break. */
                putchar('\n');
+               p->viscol = p->rmargin;
                for (i = 0; i < (int)p->rmargin; i++)
                        putchar(' ');
        }
@@ -297,7 +322,7 @@ term_newln(struct termp *p)
 {
 
        p->flags |= TERMP_NOSPACE;
-       if (0 == p->col) {
+       if (0 == p->col && 0 == p->viscol) {
                p->flags &= ~TERMP_NOLPAD;
                return;
        }
@@ -317,6 +342,7 @@ term_vspace(struct termp *p)
 {
 
        term_newln(p);
+       p->viscol = 0;
        putchar('\n');
 }