[BACK]Return to macro.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / docbook2mdoc

Diff for /docbook2mdoc/macro.c between version 1.1 and 1.6

version 1.1, 2019/03/26 19:17:29 version 1.6, 2019/04/06 22:37:57
Line 17 
Line 17 
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  #include <ctype.h>
 #include <stdio.h>  #include <stdio.h>
   #include <string.h>
   
 #include "node.h"  #include "node.h"
 #include "macro.h"  #include "macro.h"
Line 39  macro_open(struct format *f, const char *name)
Line 40  macro_open(struct format *f, const char *name)
                 break;                  break;
         case LINE_MACRO:          case LINE_MACRO:
                 putchar(' ');                  putchar(' ');
                   if (f->spc == 0)
                           fputs("Ns ", stdout);
                 break;                  break;
         }          }
         fputs(name, stdout);          fputs(name, stdout);
Line 47  macro_open(struct format *f, const char *name)
Line 50  macro_open(struct format *f, const char *name)
 void  void
 macro_close(struct format *f)  macro_close(struct format *f)
 {  {
         assert(f->linestate == LINE_MACRO);          if (f->linestate == LINE_NEW)
                   return;
         putchar('\n');          putchar('\n');
         f->linestate = LINE_NEW;          f->linestate = LINE_NEW;
 }  }
Line 60  macro_line(struct format *f, const char *name)
Line 64  macro_line(struct format *f, const char *name)
 }  }
   
 /*  /*
  * If the next node is a text node starting with closing punctuation,   * At the end of a macro, decide whether the line needs to remain open
  * emit the closing punctuation as a trailing macro argument.   * because the next node follows without intervening whitespace;
    * otherwise, close the line.
  */   */
 void  void
 macro_closepunct(struct format *f, struct pnode *pn)  macro_closepunct(struct format *f, struct pnode *pn)
 {  {
         if ((pn = TAILQ_NEXT(pn, child)) != NULL &&          char            *cp;
             pn->node == NODE_TEXT && pn->bsz > 0 &&  
             (pn->b[0] == ',' || pn->b[0] == '.') &&          if ((pn = TAILQ_NEXT(pn, child)) != NULL && pn->spc == 0) {
             (pn->bsz == 1 || isspace((unsigned char)pn->b[1]))) {  
                 putchar(' ');                  /*
                 putchar(pn->b[0]);                   * If a non-text node follows without intervening
                 pn->b++;                   * whitespace, the handler of that node will decide
                 pn->bsz--;                   * whether and how to suppress whitespace.  To allow
                    * that, the macro line needs to remain open.
                    */
   
                   if (pn->node != NODE_TEXT && pn->node != NODE_ESCAPE)
                           return;
   
                   /*
                    * Give closing punctuation
                    * in the form of trailing macro arguments.
                    */
   
                   while (*pn->b != '\0' &&
                       strchr("!),.:;?]", *pn->b) != NULL) {
                           putchar(' ');
                           putchar(*pn->b);
                           pn->b++;
                           pn->bsz--;
                   }
   
                   /*
                    * Text follows without intervening whitespace.
                    * Append the first word with .Ns.
                    */
   
                   if (*pn->b != '\0' && isspace((unsigned char)*pn->b) == 0) {
                           fputs(" Ns", stdout);
                           for (cp = pn->b; *cp != '\0'; cp++)
                                   if (isspace((unsigned char)*cp))
                                           break;
                           *cp = '\0';
                           macro_addarg(f, pn->b, ARG_SPACE);
                           pn->bsz -= cp - pn->b;
                           pn->b = cp;
                           if (pn->bsz > 0) {
                                   pn->b++;
                                   pn->bsz--;
                                   pn->spc = 1;
                           }
                   }
   
                   /* Skip whitespace after the first word. */
   
                   while (isspace((unsigned char)*pn->b)) {
                           pn->b++;
                           pn->bsz--;
                           pn->spc = 1;
                   }
         }          }
         macro_close(f);          macro_close(f);
 }  }
Line 152  macro_argline(struct format *f, const char *name, cons
Line 204  macro_argline(struct format *f, const char *name, cons
 void  void
 macro_addnode(struct format *f, struct pnode *pn, int flags)  macro_addnode(struct format *f, struct pnode *pn, int flags)
 {  {
           struct pnode    *nc;
         int              quote_now;          int              quote_now;
   
         assert(f->linestate == LINE_MACRO);          assert(f->linestate == LINE_MACRO);
   
         /*          /*
          * If the only child is a text node, just add that text,           * If this node or its only child is a text node, just add
          * letting macro_addarg() decide about quoting.           * that text, letting macro_addarg() decide about quoting.
          */           */
   
         pn = TAILQ_FIRST(&pn->childq);          while ((nc = TAILQ_FIRST(&pn->childq)) != NULL &&
         if (pn != NULL && pn->node == NODE_TEXT &&              TAILQ_NEXT(nc, child) == NULL)
             TAILQ_NEXT(pn, child) == NULL) {                  pn = nc;
   
           if (pn->node == NODE_TEXT || pn->node == NODE_ESCAPE) {
                 macro_addarg(f, pn->b, flags);                  macro_addarg(f, pn->b, flags);
                 return;                  return;
         }          }
Line 192  macro_addnode(struct format *f, struct pnode *pn, int 
Line 247  macro_addnode(struct format *f, struct pnode *pn, int 
          * inserting whitespace between nodes.           * inserting whitespace between nodes.
          */           */
   
         while (pn != NULL) {          while (nc != NULL) {
                 if (pn->node == NODE_TEXT)                  macro_addnode(f, nc, flags);
                         macro_addarg(f, pn->b, flags);                  nc = TAILQ_NEXT(nc, child);
                 else  
                         macro_addnode(f, pn, flags);  
                 pn = TAILQ_NEXT(pn, child);  
                 flags |= ARG_SPACE;                  flags |= ARG_SPACE;
         }          }
         if (quote_now)          if (quote_now)
Line 210  macro_nodeline(struct format *f, const char *name, str
Line 262  macro_nodeline(struct format *f, const char *name, str
         macro_open(f, name);          macro_open(f, name);
         macro_addnode(f, pn, ARG_SPACE | flags);          macro_addnode(f, pn, ARG_SPACE | flags);
         macro_close(f);          macro_close(f);
   }
   
   
   /*
    * Print a word on the current text line if one is open, or on a new text
    * line otherwise.  The flag ARG_SPACE inserts spaces between words.
    */
   void
   print_text(struct format *f, const char *word, int flags) {
           switch (f->linestate) {
           case LINE_NEW:
                   break;
           case LINE_TEXT:
                   if (flags & ARG_SPACE)
                           putchar(' ');
                   break;
           case LINE_MACRO:
                   macro_close(f);
                   break;
           }
           fputs(word, stdout);
           f->linestate = LINE_TEXT;
   }
   
   /*
    * Recursively print the content of a node on a text line.
    */
   void
   print_textnode(struct format *f, struct pnode *n)
   {
           struct pnode    *nc;
   
           if (n->node == NODE_TEXT || n->node == NODE_ESCAPE)
                   print_text(f, n->b, ARG_SPACE);
           else
                   TAILQ_FOREACH(nc, &n->childq, child)
                           print_textnode(f, nc);
 }  }

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.6

CVSweb