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

Diff for /docbook2mdoc/docbook2mdoc.c between version 1.42 and 1.52

version 1.42, 2014/10/12 15:48:42 version 1.52, 2019/03/22 16:21:23
Line 1 
Line 1 
 /*      $Id$ */  /* $Id$ */
 /*  /*
  * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>
    * Copyright (c) 2019 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 37  struct parse {
Line 38  struct parse {
         enum nodeid      node; /* current (NODE_ROOT if pre-tree) */          enum nodeid      node; /* current (NODE_ROOT if pre-tree) */
         const char      *fname; /* filename */          const char      *fname; /* filename */
         int              stop; /* should we stop now? */          int              stop; /* should we stop now? */
   #define PARSE_EQN        1
           unsigned int     flags; /* document-wide flags */
         struct pnode    *root; /* root of parse tree */          struct pnode    *root; /* root of parse tree */
         struct pnode    *cur; /* current node in tree */          struct pnode    *cur; /* current node in tree */
         char            *b; /* nil-terminated buffer for pre-print */          char            *b; /* NUL-terminated buffer for pre-print */
         size_t           bsz; /* current length of b */          size_t           bsz; /* current length of b */
         size_t           mbsz; /* max bsz allocation */          size_t           mbsz; /* max bsz allocation */
           int              level; /* header level, starting at 1 */
         int              newln; /* output: are we on a fresh line */          int              newln; /* output: are we on a fresh line */
 };  };
   
Line 89  static const char *attrvals[ATTRVAL__MAX] = {
Line 93  static const char *attrvals[ATTRVAL__MAX] = {
 };  };
   
 static  const struct node nodes[NODE__MAX] = {  static  const struct node nodes[NODE__MAX] = {
         { NULL, 0 },          { NULL, 0 },
         { "acronym", 0 },          { "acronym", 0 },
         { "anchor", NODE_IGNTEXT },          { "affiliation", NODE_IGNTEXT },
         { "application", 0 },          { "anchor", NODE_IGNTEXT },
         { "arg", 0 },          { "application", 0 },
         { "caution", NODE_IGNTEXT },          { "arg", 0 },
         { "citerefentry", NODE_IGNTEXT },          { "author", NODE_IGNTEXT },
         { "cmdsynopsis", NODE_IGNTEXT },          { "authorgroup", NODE_IGNTEXT },
         { "code", 0 },          { "blockquote", NODE_IGNTEXT },
           { "book", NODE_IGNTEXT },
           { "bookinfo", NODE_IGNTEXT },
           { "caution", NODE_IGNTEXT },
           { "chapter", NODE_IGNTEXT },
           { "citerefentry", NODE_IGNTEXT },
           { "citetitle", 0 },
           { "cmdsynopsis", NODE_IGNTEXT },
           { "code", 0 },
         { "colspec", NODE_IGNTEXT },          { "colspec", NODE_IGNTEXT },
         { "command", 0 },          { "command", 0 },
         { "constant", 0 },          { "constant", 0 },
         { "copyright", NODE_IGNTEXT },          { "copyright", NODE_IGNTEXT },
         { "date", 0 },          { "date", 0 },
           { "editor", NODE_IGNTEXT },
         { "emphasis", 0 },          { "emphasis", 0 },
         { "entry", 0 },          { "entry", 0 },
         { "envar", 0 },          { "envar", 0 },
         { "fieldsynopsis", NODE_IGNTEXT },          { "fieldsynopsis", NODE_IGNTEXT },
         { "filename", 0 },          { "filename", 0 },
           { "firstname", 0 },
           { "firstterm", 0 },
           { "footnote", 0 },
         { "funcdef", 0 },          { "funcdef", 0 },
         { "funcprototype", NODE_IGNTEXT },          { "funcprototype", NODE_IGNTEXT },
         { "funcsynopsis", NODE_IGNTEXT },          { "funcsynopsis", NODE_IGNTEXT },
         { "funcsynopsisinfo", 0 },          { "funcsynopsisinfo", 0 },
         { "function", 0 },          { "function", 0 },
         { "group", NODE_IGNTEXT },          { "glossterm", 0 },
           { "group", NODE_IGNTEXT },
         { "holder", NODE_IGNTEXT },          { "holder", NODE_IGNTEXT },
           { "index", NODE_IGNTEXT },
           { "indexterm", NODE_IGNTEXT },
         { "info", NODE_IGNTEXT },          { "info", NODE_IGNTEXT },
         { "informalequation", NODE_IGNTEXT },          { "informalequation", NODE_IGNTEXT },
         { "informaltable", NODE_IGNTEXT },          { "informaltable", NODE_IGNTEXT },
         { "inlineequation", NODE_IGNTEXT },          { "inlineequation", NODE_IGNTEXT },
         { "itemizedlist", NODE_IGNTEXT },          { "itemizedlist", NODE_IGNTEXT },
         { "link", 0 },          { "keysym", 0 },
         { "listitem", NODE_IGNTEXT },          { "legalnotice", NODE_IGNTEXT },
         { "literal", 0 },          { "link", 0 },
         { "manvolnum", 0 },          { "listitem", NODE_IGNTEXT },
         { "mml:math", NODE_IGNTEXT },          { "literal", 0 },
         { "mml:mfenced", 0 },          { "literallayout", 0 },
         { "mml:mfrac", 0 },          { "manvolnum", 0 },
         { "mml:mi", 0 },          { "member", 0 },
         { "mml:mn", 0 },          { "mml:math", NODE_IGNTEXT },
         { "mml:mo", 0 },          { "mml:mfenced", 0 },
         { "mml:mrow", 0 },          { "mml:mfrac", 0 },
         { "mml:msub", 0 },          { "mml:mi", 0 },
         { "mml:msup", 0 },          { "mml:mn", 0 },
         { "modifier", 0 },          { "mml:mo", 0 },
         { "note", NODE_IGNTEXT },          { "mml:mrow", 0 },
         { "option", 0 },          { "mml:msub", 0 },
         { "orderedlist", NODE_IGNTEXT },          { "mml:msup", 0 },
         { "para", 0 },          { "modifier", 0 },
           { "note", NODE_IGNTEXT },
           { "option", 0 },
           { "orderedlist", NODE_IGNTEXT },
           { "orgname", 0 },
           { "othername", 0 },
           { "para", 0 },
         { "paramdef", 0 },          { "paramdef", 0 },
         { "parameter", 0 },          { "parameter", 0 },
         { "programlisting", 0 },          { "part", NODE_IGNTEXT },
         { "prompt", 0 },          { "phrase", 0 },
         { "quote", 0 },          { "preface", NODE_IGNTEXT },
         { "refclass", NODE_IGNTEXT },          { "primary", 0 },
         { "refdescriptor", NODE_IGNTEXT },          { "programlisting", 0 },
         { "refentry", NODE_IGNTEXT },          { "prompt", 0 },
         { "refentryinfo", NODE_IGNTEXT },          { "quote", 0 },
         { "refentrytitle", 0 },          { "refclass", NODE_IGNTEXT },
         { "refmeta", NODE_IGNTEXT },          { "refdescriptor", NODE_IGNTEXT },
         { "refmetainfo", NODE_IGNTEXT },          { "refentry", NODE_IGNTEXT },
         { "refmiscinfo", NODE_IGNTEXT },          { "refentryinfo", NODE_IGNTEXT },
         { "refname", 0 },          { "refentrytitle", 0 },
         { "refnamediv", NODE_IGNTEXT },          { "refmeta", NODE_IGNTEXT },
         { "refpurpose", 0 },          { "refmetainfo", NODE_IGNTEXT },
         { "refsect1", NODE_IGNTEXT },          { "refmiscinfo", NODE_IGNTEXT },
         { "refsect2", NODE_IGNTEXT },          { "refname", 0 },
         { "refsect3", NODE_IGNTEXT },          { "refnamediv", NODE_IGNTEXT },
         { "refsection", NODE_IGNTEXT },          { "refpurpose", 0 },
         { "refsynopsisdiv", NODE_IGNTEXT },          { "refsect1", NODE_IGNTEXT },
         { "replaceable", 0 },          { "refsect2", NODE_IGNTEXT },
         { "row", NODE_IGNTEXT },          { "refsect3", NODE_IGNTEXT },
         { "sbr", NODE_IGNTEXT },          { "refsection", NODE_IGNTEXT },
         { "screen", NODE_IGNTEXT },          { "refsynopsisdiv", NODE_IGNTEXT },
         { "sgmltag", 0 },          { "releaseinfo", 0 },
         { "structname", 0 },          { "replaceable", 0 },
         { "synopsis", 0 },          { "row", NODE_IGNTEXT },
         { "table", NODE_IGNTEXT },          { "sbr", NODE_IGNTEXT },
         { "tbody", NODE_IGNTEXT },          { "screen", NODE_IGNTEXT },
         { "term", 0 },          { "secondary", 0 },
         { NULL, 0 },          { "sect1", NODE_IGNTEXT },
         { "tfoot", NODE_IGNTEXT },          { "sect2", NODE_IGNTEXT },
         { "tgroup", NODE_IGNTEXT },          { "section", NODE_IGNTEXT },
         { "thead", NODE_IGNTEXT },          { "sgmltag", 0 },
         { "tip", NODE_IGNTEXT },          { "simplelist", NODE_IGNTEXT },
         { "title", 0 },          { "spanspec", NODE_IGNTEXT },
         { "trademark", 0 },          { "structname", 0 },
         { "type", 0 },          { "subtitle", 0 },
         { "ulink", 0 },          { "surname", 0 },
         { "userinput", 0 },          { "synopsis", 0 },
         { "variablelist", NODE_IGNTEXT },          { "table", NODE_IGNTEXT },
         { "varlistentry", NODE_IGNTEXT },          { "tbody", NODE_IGNTEXT },
         { "varname", 0 },          { "term", 0 },
         { "warning", NODE_IGNTEXT },          { NULL, 0 },
         { "wordasword", 0 },          { "tfoot", NODE_IGNTEXT },
         { "year", NODE_IGNTEXT },          { "tgroup", NODE_IGNTEXT },
           { "thead", NODE_IGNTEXT },
           { "tip", NODE_IGNTEXT },
           { "title", 0 },
           { "trademark", 0 },
           { "type", 0 },
           { "ulink", 0 },
           { "userinput", 0 },
           { "variablelist", NODE_IGNTEXT },
           { "varlistentry", NODE_IGNTEXT },
           { "varname", 0 },
           { "warning", NODE_IGNTEXT },
           { "wordasword", 0 },
           { "year", NODE_IGNTEXT },
 };  };
   
 static  int warn = 0;  static  int warn = 0;
Line 223  xml_char(void *arg, const XML_Char *p, int sz)
Line 261  xml_char(void *arg, const XML_Char *p, int sz)
          */           */
         if (NODE_TEXT != ps->node) {          if (NODE_TEXT != ps->node) {
                 for (i = 0; i < sz; i++)                  for (i = 0; i < sz; i++)
                         if ( ! isspace((int)p[i]))                          if ( ! isspace((unsigned char)p[i]))
                                 break;                                  break;
                 if (i == sz)                  if (i == sz)
                         return;                          return;
Line 246  xml_char(void *arg, const XML_Char *p, int sz)
Line 284  xml_char(void *arg, const XML_Char *p, int sz)
   
         /* Append to current buffer. */          /* Append to current buffer. */
         assert(sz >= 0);          assert(sz >= 0);
         ps->cur->b = realloc(ps->cur->b,          ps->cur->b = realloc(ps->cur->b,
                 ps->cur->bsz + (size_t)sz);                  ps->cur->bsz + (size_t)sz);
         if (NULL == ps->cur->b) {          if (NULL == ps->cur->b) {
                 perror(NULL);                  perror(NULL);
Line 263  pnode_trim(struct pnode *pn)
Line 301  pnode_trim(struct pnode *pn)
   
         assert(NODE_TEXT == pn->node);          assert(NODE_TEXT == pn->node);
         for ( ; pn->bsz > 0; pn->bsz--)          for ( ; pn->bsz > 0; pn->bsz--)
                 if ( ! isspace((int)pn->b[pn->bsz - 1]))                  if ( ! isspace((unsigned char)pn->b[pn->bsz - 1]))
                         break;                          break;
 }  }
   
Line 305  xml_elem_start(void *arg, const XML_Char *name, const 
Line 343  xml_elem_start(void *arg, const XML_Char *name, const 
                 ps->node = ps->cur->node;                  ps->node = ps->cur->node;
         }          }
   
   
         for (node = 0; node < NODE__MAX; node++)          for (node = 0; node < NODE__MAX; node++)
                 if (NULL == nodes[node].name)                  if (NULL == nodes[node].name)
                         continue;                          continue;
Line 315  xml_elem_start(void *arg, const XML_Char *name, const 
Line 352  xml_elem_start(void *arg, const XML_Char *name, const 
         if (NODE__MAX == node && NODE_ROOT == ps->node) {          if (NODE__MAX == node && NODE_ROOT == ps->node) {
                 return;                  return;
         } else if (NODE__MAX == node) {          } else if (NODE__MAX == node) {
                 fprintf(stderr, "%s:%zu:%zu: unknown node \"%s\"\n",                  fprintf(stderr, "%s:%zu:%zu: unknown node \"%s\"\n",
                         ps->fname, XML_GetCurrentLineNumber(ps->xml),                          ps->fname, XML_GetCurrentLineNumber(ps->xml),
                         XML_GetCurrentColumnNumber(ps->xml), name);                          XML_GetCurrentColumnNumber(ps->xml), name);
                 ps->stop = 1;                  ps->stop = 1;
Line 326  xml_elem_start(void *arg, const XML_Char *name, const 
Line 363  xml_elem_start(void *arg, const XML_Char *name, const 
                         XML_GetCurrentColumnNumber(ps->xml));                          XML_GetCurrentColumnNumber(ps->xml));
                 ps->stop = 1;                  ps->stop = 1;
                 return;                  return;
         } else if (NODE_ROOT == ps->node && NODE_REFENTRY != node) {          } else if (NODE_ROOT == ps->node && NODE_REFENTRY != node &&
               NODE_PART != node && NODE_BOOK != node) {
                 return;                  return;
         } else if ( ! isparent(node, ps->node)) {  
                 fprintf(stderr, "%s:%zu:%zu: bad parent \"%s\" "  
                         "of node \"%s\"\n",  
                         ps->fname, XML_GetCurrentLineNumber(ps->xml),  
                         XML_GetCurrentColumnNumber(ps->xml),  
                         NULL == nodes[ps->node].name ?  
                         "(none)" : nodes[ps->node].name,  
                         NULL == nodes[node].name ?  
                         "(none)" : nodes[node].name);  
                 ps->stop = 1;  
                 return;  
         }          }
   
           if (NODE_INLINEEQUATION == node)
                   ps->flags |= PARSE_EQN;
   
         if (NULL == (dat = calloc(1, sizeof(struct pnode)))) {          if (NULL == (dat = calloc(1, sizeof(struct pnode)))) {
                 perror(NULL);                  perror(NULL);
                 exit(EXIT_FAILURE);                  exit(EXIT_FAILURE);
Line 366  xml_elem_start(void *arg, const XML_Char *name, const 
Line 396  xml_elem_start(void *arg, const XML_Char *name, const 
                         if (0 == strcmp(*att, attrkeys[key]))                          if (0 == strcmp(*att, attrkeys[key]))
                                 break;                                  break;
                 if (ATTRKEY__MAX == key) {                  if (ATTRKEY__MAX == key) {
                         if (warn)  
                                 fprintf(stderr, "%s:%zu:%zu: warning: "  
                                         "unknown attribute \"%s\"\n",  
                                         ps->fname,  
                                         XML_GetCurrentLineNumber(ps->xml),  
                                         XML_GetCurrentColumnNumber(ps->xml),  
                                         *att);  
                         continue;  
                 } else if ( ! isattrkey(node, key)) {  
                         if (warn)                          if (warn)
                                 fprintf(stderr, "%s:%zu:%zu: warning: "                                  fprintf(stderr, "%s:%zu:%zu: warning: "
                                         "bad attribute \"%s\"\n",                                          "unknown attribute \"%s\"\n",
                                         ps->fname,                                          ps->fname,
                                         XML_GetCurrentLineNumber(ps->xml),                                          XML_GetCurrentLineNumber(ps->xml),
                                         XML_GetCurrentColumnNumber(ps->xml),                                          XML_GetCurrentColumnNumber(ps->xml),
                                         *att);                                          *att);
                         continue;                          continue;
                 }                  }
                 for (val = 0; val < ATTRVAL__MAX; val++)                  for (val = 0; val < ATTRVAL__MAX; val++)
                         if (0 == strcmp(*(att + 1), attrvals[val]))                          if (0 == strcmp(*(att + 1), attrvals[val]))
                                 break;                                  break;
                 if (ATTRVAL__MAX != val && ! isattrval(key, val)) {  
                         if (warn)  
                                 fprintf(stderr, "%s:%zu:%zu: warning: "  
                                         "bad attribute value \"%s\"\n",  
                                         ps->fname,  
                                         XML_GetCurrentLineNumber(ps->xml),  
                                         XML_GetCurrentColumnNumber(ps->xml),  
                                         *(att + 1));  
                         continue;  
                 }  
                 pattr = calloc(1, sizeof(struct pattr));                  pattr = calloc(1, sizeof(struct pattr));
                 pattr->key = key;                  pattr->key = key;
                 pattr->val = val;                  pattr->val = val;
Line 501  bufclear(struct parse *p)
Line 512  bufclear(struct parse *p)
 /*  /*
  * Append NODE_TEXT contents to the current buffer, reallocating its   * Append NODE_TEXT contents to the current buffer, reallocating its
  * size if necessary.   * size if necessary.
  * The buffer is ALWAYS nil-terminated.   * The buffer is ALWAYS NUL-terminated.
  */   */
 static void  static void
 bufappend(struct parse *p, struct pnode *pn)  bufappend(struct parse *p, struct pnode *pn)
Line 537  bufappend_r(struct parse *p, struct pnode *pn)
Line 548  bufappend_r(struct parse *p, struct pnode *pn)
                 bufappend_r(p, pp);                  bufappend_r(p, pp);
 }  }
   
 /*  /*
  * Recursively search and return the first instance of "node".   * Recursively search and return the first instance of "node".
  */   */
 static struct pnode *  static struct pnode *
Line 576  pnode_printmacrolinetext(struct parse *p, struct pnode
Line 587  pnode_printmacrolinetext(struct parse *p, struct pnode
   
         /* Convert all space to spaces. */          /* Convert all space to spaces. */
         for (cp = p->b; '\0' != *cp; cp++)          for (cp = p->b; '\0' != *cp; cp++)
                 if (isspace((int)*cp))                  if (isspace((unsigned char)*cp))
                         *cp = ' ';                          *cp = ' ';
   
         for (cp = p->b; isspace((int)*cp); cp++)          for (cp = p->b; isspace((unsigned char)*cp); cp++)
                 /* Spin past whitespace (XXX: necessary?) */ ;                  /* Spin past whitespace (XXX: necessary?) */ ;
         for ( ; '\0' != *cp; cp++) {          for ( ; '\0' != *cp; cp++) {
                 /* Escape us if we look like a macro. */                  /* Escape us if we look like a macro. */
                 if ((cp == p->b || ' ' == *(cp - 1)) &&                  if ((cp == p->b || ' ' == *(cp - 1)) &&
                         isupper((int)*cp) &&                          isupper((unsigned char)*cp) &&
                         '\0' != *(cp + 1) &&                          '\0' != *(cp + 1) &&
                         islower((int)*(cp + 1)) &&                          islower((unsigned char)*(cp + 1)) &&
                         ('\0' == *(cp + 2) ||                          ('\0' == *(cp + 2) ||
                          ' ' == *(cp + 2) ||                           ' ' == *(cp + 2) ||
                          (islower((int)*(cp + 2)) &&                           (islower((unsigned char)*(cp + 2)) &&
                           ('\0' == *(cp + 3) ||                            ('\0' == *(cp + 3) ||
                            ' ' == *(cp + 3)))))                             ' ' == *(cp + 3)))))
                         fputs("\\&", stdout);                          fputs("\\&", stdout);
                 if (MACROLINE_UPPER & fl)                  if (MACROLINE_UPPER & fl)
                         putchar(toupper((int)*cp));                          putchar(toupper((unsigned char)*cp));
                 else                  else
                         putchar((int)*cp);                          putchar(*cp);
                 /* If we're a character escape, escape us. */                  /* If we're a character escape, escape us. */
                 if ('\\' == *cp)                  if ('\\' == *cp)
                         putchar('e');                          putchar('e');
Line 653  static void
Line 664  static void
 pnode_printmclosepunct(struct parse *p, struct pnode *pn, int sv)  pnode_printmclosepunct(struct parse *p, struct pnode *pn, int sv)
 {  {
         /* We wouldn't have done anything anyway. */          /* We wouldn't have done anything anyway. */
         if ( ! (sv && ! p->newln))          if ( ! (sv && ! p->newln))
                 return;                  return;
   
         /* No next node or it's not text. */          /* No next node or it's not text. */
Line 663  pnode_printmclosepunct(struct parse *p, struct pnode *
Line 674  pnode_printmclosepunct(struct parse *p, struct pnode *
         } else if (NODE_TEXT != pn->node) {          } else if (NODE_TEXT != pn->node) {
                 pnode_printmclose(p, sv);                  pnode_printmclose(p, sv);
                 return;                  return;
         }          }
   
         /* Only do this for the comma/period. */          /* Only do this for the comma/period. */
         if (pn->bsz > 0 &&          if (pn->bsz > 0 &&
                 (',' == pn->b[0] || '.' == pn->b[0]) &&                  (',' == pn->b[0] || '.' == pn->b[0]) &&
                 (1 == pn->bsz || isspace((int)pn->b[1]))) {                  (1 == pn->bsz || isspace((unsigned char)pn->b[1]))) {
                 putchar(' ');                  putchar(' ');
                 putchar(pn->b[0]);                  putchar(pn->b[0]);
                 pn->b++;                  pn->b++;
                 pn->bsz--;                  pn->bsz--;
         }          }
   
         putchar('\n');          putchar('\n');
         p->newln = 1;          p->newln = 1;
Line 687  pnode_printrefsynopsisdiv(struct parse *p, struct pnod
Line 698  pnode_printrefsynopsisdiv(struct parse *p, struct pnod
 {  {
         struct pnode    *pp;          struct pnode    *pp;
   
         TAILQ_FOREACH(pp, &pn->childq, child)          TAILQ_FOREACH(pp, &pn->childq, child)
                 if (NODE_TITLE == pp->node) {                  if (NODE_TITLE == pp->node) {
                         pnode_unlink(pp);                          pnode_unlink(pp);
                         return;                          return;
Line 701  static void
Line 712  static void
 pnode_printrefsect(struct parse *p, struct pnode *pn)  pnode_printrefsect(struct parse *p, struct pnode *pn)
 {  {
         struct pnode    *pp;          struct pnode    *pp;
           const char      *title;
           int              flags, level;
   
           level = ++p->level;
           flags = 1 == level ? MACROLINE_UPPER : 0;
           if (3 > level) {
                   switch (pn->node) {
                   case (NODE_CAUTION):
                   case (NODE_NOTE):
                   case (NODE_TIP):
                   case (NODE_WARNING):
                           level = 3;
                           break;
                   default:
                           break;
                   }
           }
   
         TAILQ_FOREACH(pp, &pn->childq, child)          TAILQ_FOREACH(pp, &pn->childq, child)
                 if (NODE_TITLE == pp->node)                  if (NODE_TITLE == pp->node)
                         break;                          break;
   
         switch (pn->node) {          if (NULL == pp) {
         case (NODE_REFSECT1):                  switch (pn->node) {
                   case (NODE_PREFACE):
                           title = "Preface";
                           break;
                   case (NODE_CAUTION):
                           title = "Caution";
                           break;
                   case (NODE_NOTE):
                           title = "Note";
                           break;
                   case (NODE_TIP):
                           title = "Tip";
                           break;
                   case (NODE_WARNING):
                           title = "Warning";
                           break;
                   default:
                           title = "Unknown";
                           break;
                   }
           }
   
           switch (level) {
           case (1):
                 fputs(".Sh", stdout);                  fputs(".Sh", stdout);
                 break;                  break;
         case (NODE_REFSECT2):          case (2):
                 fputs(".Ss", stdout);                  fputs(".Ss", stdout);
                 break;                  break;
         case (NODE_REFSECT3):          default:
                 puts(".Pp");                  puts(".Pp");
                 fputs(".Sy", stdout);                  fputs(".Sy", stdout);
                 break;                  break;
         case (NODE_NOTE):  
                 /* FALLTHROUGH */  
         case (NODE_REFSECTION):  
                 /* FALLTHROUGH */  
         case (NODE_TIP):  
                 /* FALLTHROUGH */  
         case (NODE_CAUTION):  
                 /* FALLTHROUGH */  
         case (NODE_WARNING):  
                 puts(".Pp");  
                 if (NULL == pp)  
                         return;  
                 fputs(".Em", stdout);  
                 break;  
         default:  
                 break;  
         }          }
   
         p->newln = 0;  
   
         if (NULL != pp) {          if (NULL != pp) {
                 pnode_printmacrolinetext(p, pp,                  p->newln = 0;
                         NODE_REFSECT1 == pn->node ?                  pnode_printmacrolinetext(p, pp, flags);
                         MACROLINE_UPPER : 0);  
                 pnode_printmclose(p, 1);                  pnode_printmclose(p, 1);
                 pnode_unlink(pp);                  pnode_unlink(pp);
         } else {          } else
                 puts(NODE_REFSECT1 == pn->node ?                  printf(" %s\n", title);
                         "UNKNOWN" : "unknown");  
                 p->newln = 1;  
         }  
 }  }
   
 /*  /*
Line 790  pnode_printrefmeta(struct parse *p, struct pnode *pn)
Line 819  pnode_printrefmeta(struct parse *p, struct pnode *pn)
                 else if (NODE_REFENTRYTITLE == pp->node)                  else if (NODE_REFENTRYTITLE == pp->node)
                         title = pp;                          title = pp;
   
         puts(".Dd $Mdocdate" "$");  
         fputs(".Dt", stdout);          fputs(".Dt", stdout);
         p->newln = 0;          p->newln = 0;
   
Line 804  pnode_printrefmeta(struct parse *p, struct pnode *pn)
Line 832  pnode_printrefmeta(struct parse *p, struct pnode *pn)
                 p->newln = 1;                  p->newln = 1;
         } else          } else
                 pnode_printmacroline(p, manvol);                  pnode_printmacroline(p, manvol);
   
         puts(".Os");  
 }  }
   
 static void  static void
Line 940  pnode_printfuncprototype(struct parse *p, struct pnode
Line 966  pnode_printfuncprototype(struct parse *p, struct pnode
   
         assert(p->newln);          assert(p->newln);
         TAILQ_FOREACH(fdef, &pn->childq, child)          TAILQ_FOREACH(fdef, &pn->childq, child)
                 if (NODE_FUNCDEF == fdef->node)                  if (NODE_FUNCDEF == fdef->node)
                         break;                          break;
   
         if (NULL != fdef)          if (NULL != fdef)
Line 948  pnode_printfuncprototype(struct parse *p, struct pnode
Line 974  pnode_printfuncprototype(struct parse *p, struct pnode
         else          else
                 puts(".Fo UNKNOWN");                  puts(".Fo UNKNOWN");
   
         TAILQ_FOREACH(pp, &pn->childq, child)          TAILQ_FOREACH(pp, &pn->childq, child)
                 if (NODE_PARAMDEF == pp->node)                  if (NODE_PARAMDEF == pp->node)
                         pnode_printparamdef(p, pp);                          pnode_printparamdef(p, pp);
   
Line 956  pnode_printfuncprototype(struct parse *p, struct pnode
Line 982  pnode_printfuncprototype(struct parse *p, struct pnode
         p->newln = 1;          p->newln = 1;
 }  }
   
 /*  /*
  * The <arg> element is more complicated than it should be because text   * The <arg> element is more complicated than it should be because text
  * nodes are treated like ".Ar foo", but non-text nodes need to be   * nodes are treated like ".Ar foo", but non-text nodes need to be
  * re-sent into the printer (i.e., without the preceding ".Ar").   * re-sent into the printer (i.e., without the preceding ".Ar").
Line 972  pnode_printarg(struct parse *p, struct pnode *pn)
Line 998  pnode_printarg(struct parse *p, struct pnode *pn)
   
         isop = 1;          isop = 1;
         isrep = 0;          isrep = 0;
         TAILQ_FOREACH(ap, &pn->attrq, child)          TAILQ_FOREACH(ap, &pn->attrq, child)
                 if (ATTRKEY_CHOICE == ap->key &&                  if (ATTRKEY_CHOICE == ap->key &&
                         (ATTRVAL_PLAIN == ap->val ||                          (ATTRVAL_PLAIN == ap->val ||
                          ATTRVAL_REQ == ap->val))                           ATTRVAL_REQ == ap->val))
                         isop = 0;                          isop = 0;
                 else if (ATTRKEY_REP == ap->key &&                  else if (ATTRKEY_REP == ap->key &&
                         (ATTRVAL_REPEAT == ap->val))                          (ATTRVAL_REPEAT == ap->val))
Line 990  pnode_printarg(struct parse *p, struct pnode *pn)
Line 1016  pnode_printarg(struct parse *p, struct pnode *pn)
                 if (NODE_TEXT == pp->node) {                  if (NODE_TEXT == pp->node) {
                         pnode_printmopen(p);                          pnode_printmopen(p);
                         fputs("Ar", stdout);                          fputs("Ar", stdout);
                 }                  }
                 pnode_print(p, pp);                  pnode_print(p, pp);
                 if (NODE_TEXT == pp->node && isrep)                  if (NODE_TEXT == pp->node && isrep)
                         fputs("...", stdout);                          fputs("...", stdout);
         }          }
 }  }
Line 1005  pnode_printgroup(struct parse *p, struct pnode *pn)
Line 1031  pnode_printgroup(struct parse *p, struct pnode *pn)
         int              isop, sv;          int              isop, sv;
   
         isop = 1;          isop = 1;
         TAILQ_FOREACH(ap, &pn->attrq, child)          TAILQ_FOREACH(ap, &pn->attrq, child)
                 if (ATTRKEY_CHOICE == ap->key &&                  if (ATTRKEY_CHOICE == ap->key &&
                         (ATTRVAL_PLAIN == ap->val ||                          (ATTRVAL_PLAIN == ap->val ||
                          ATTRVAL_REQ == ap->val)) {                           ATTRVAL_REQ == ap->val)) {
Line 1013  pnode_printgroup(struct parse *p, struct pnode *pn)
Line 1039  pnode_printgroup(struct parse *p, struct pnode *pn)
                         break;                          break;
                 }                  }
   
         /*          /*
          * Make sure we're on a macro line.           * Make sure we're on a macro line.
          * This will prevent pnode_print() for putting us on a           * This will prevent pnode_print() for putting us on a
          * subsequent line.           * subsequent line.
          */           */
         sv = p->newln;          sv = p->newln;
         pnode_printmopen(p);          pnode_printmopen(p);
         if (isop)          if (isop)
                 fputs("Op", stdout);                  fputs("Op", stdout);
         else if (sv)          else if (sv)
                 fputs("No", stdout);                  fputs("No", stdout);
Line 1053  static void
Line 1079  static void
 pnode_printprologue(struct parse *p, struct pnode *pn)  pnode_printprologue(struct parse *p, struct pnode *pn)
 {  {
         struct pnode    *pp;          struct pnode    *pp;
           struct pattr    *ap;
           const char      *name;
   
         pp = NULL == p->root ? NULL :          pp = NULL == p->root ? NULL :
                 pnode_findfirst(p->root, NODE_REFMETA);                  pnode_findfirst(p->root, NODE_REFMETA);
   
           puts(".Dd $Mdocdate" "$");
         if (NULL != pp) {          if (NULL != pp) {
                 pnode_printrefmeta(p, pp);                  pnode_printrefmeta(p, pp);
                 pnode_unlink(pp);                  pnode_unlink(pp);
         } else {          } else {
                 puts(".\\\" Supplying bogus prologue...");                  name = "UNKNOWN";
                 puts(".Dd $Mdocdate" "$");                  TAILQ_FOREACH(ap, &p->root->attrq, child) {
                 puts(".Dt UNKNOWN 1");                          if (ATTRKEY_ID == ap->key) {
                 puts(".Os");                                  name = ap->rawval;
                                   break;
                           }
                   }
                   printf(".Dt %s 1\n", name);
         }          }
           puts(".Os");
   
           if (PARSE_EQN & p->flags) {
                   puts(".EQ");
                   puts("delim $$");
                   puts(".EN");
           }
 }  }
   
 /*  /*
Line 1212  pnode_print(struct parse *p, struct pnode *pn)
Line 1252  pnode_print(struct parse *p, struct pnode *pn)
   
         sv = p->newln;          sv = p->newln;
   
           /* XXX fprintf(stderr, "NODE %s\n", nodes[pn->node].name); */
         switch (pn->node) {          switch (pn->node) {
         case (NODE_APPLICATION):          case (NODE_APPLICATION):
                 pnode_printmopen(p);                  pnode_printmopen(p);
Line 1224  pnode_print(struct parse *p, struct pnode *pn)
Line 1265  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printarg(p, pn);                  pnode_printarg(p, pn);
                 pnode_unlinksub(pn);                  pnode_unlinksub(pn);
                 break;                  break;
           case (NODE_AUTHOR):
                   pnode_printmopen(p);
                   fputs("An", stdout);
                   break;
           case (NODE_AUTHORGROUP):
                   assert(p->newln);
                   puts(".An -split");
                   break;
           case (NODE_BOOKINFO):
                   assert(p->newln);
                   puts(".Sh NAME");
                   break;
         case (NODE_CITEREFENTRY):          case (NODE_CITEREFENTRY):
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Xr", stdout);                  fputs("Xr", stdout);
Line 1242  pnode_print(struct parse *p, struct pnode *pn)
Line 1295  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Dv", stdout);                  fputs("Dv", stdout);
                 break;                  break;
           case (NODE_EDITOR):
                   puts("editor: ");
                   pnode_printmopen(p);
                   fputs("An", stdout);
                   break;
         case (NODE_EMPHASIS):          case (NODE_EMPHASIS):
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Em", stdout);                  fputs("Em", stdout);
Line 1267  pnode_print(struct parse *p, struct pnode *pn)
Line 1325  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Fd", stdout);                  fputs("Fd", stdout);
                 break;                  break;
           case (NODE_INFORMALEQUATION):
                   if ( ! p->newln)
                           putchar('\n');
                   puts(".EQ");
                   p->newln = 0;
                   break;
           case (NODE_INLINEEQUATION):
                   fputc('$', stdout);
                   p->newln = 0;
                   break;
         case (NODE_ITEMIZEDLIST):          case (NODE_ITEMIZEDLIST):
                 assert(p->newln);                  assert(p->newln);
                 pnode_printlist(p, pn);                  pnode_printlist(p, pn);
Line 1276  pnode_print(struct parse *p, struct pnode *pn)
Line 1344  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printgroup(p, pn);                  pnode_printgroup(p, pn);
                 pnode_unlinksub(pn);                  pnode_unlinksub(pn);
                 break;                  break;
           case (NODE_LEGALNOTICE):
                   assert(p->newln);
                   puts(".Sh LEGAL NOTICE");
                   break;
         case (NODE_LITERAL):          case (NODE_LITERAL):
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Li", stdout);                  fputs("Li", stdout);
                 break;                  break;
         case (NODE_MML_MATH):  
                 if ( ! p->newln)  
                         putchar('\n');  
                 puts(".EQ");  
                 p->newln = 0;  
                 break;  
         case (NODE_MML_MFENCED):          case (NODE_MML_MFENCED):
                 pnode_printmathfenced(p, pn);                  pnode_printmathfenced(p, pn);
                 pnode_unlinksub(pn);                  pnode_unlinksub(pn);
Line 1294  pnode_print(struct parse *p, struct pnode *pn)
Line 1360  pnode_print(struct parse *p, struct pnode *pn)
         case (NODE_MML_MI):          case (NODE_MML_MI):
         case (NODE_MML_MN):          case (NODE_MML_MN):
         case (NODE_MML_MO):          case (NODE_MML_MO):
                 putchar('{');                  if (TAILQ_EMPTY(&pn->childq))
                           break;
                   fputs(" { ", stdout);
                 break;                  break;
         case (NODE_MML_MFRAC):          case (NODE_MML_MFRAC):
         case (NODE_MML_MSUB):          case (NODE_MML_MSUB):
Line 1313  pnode_print(struct parse *p, struct pnode *pn)
Line 1381  pnode_print(struct parse *p, struct pnode *pn)
                 break;                  break;
         case (NODE_PARA):          case (NODE_PARA):
                 assert(p->newln);                  assert(p->newln);
                 if (NULL != pn->parent &&                  if (NULL != pn->parent &&
                         NODE_LISTITEM == pn->parent->node)                          NODE_LISTITEM == pn->parent->node)
                         break;                          break;
                 puts(".Pp");                  puts(".Pp");
                 break;                  break;
Line 1330  pnode_print(struct parse *p, struct pnode *pn)
Line 1398  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Qo", stdout);                  fputs("Qo", stdout);
                 break;                  break;
           case (NODE_LITERALLAYOUT):
                   /* FALLTHROUGH */
         case (NODE_PROGRAMLISTING):          case (NODE_PROGRAMLISTING):
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case (NODE_SCREEN):          case (NODE_SCREEN):
Line 1365  pnode_print(struct parse *p, struct pnode *pn)
Line 1435  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_printrefsynopsisdiv(p, pn);                  pnode_printrefsynopsisdiv(p, pn);
                 puts(".Sh SYNOPSIS");                  puts(".Sh SYNOPSIS");
                 break;                  break;
           case (NODE_PREFACE):
         case (NODE_REFSECT1):          case (NODE_REFSECT1):
                 /* FALLTHROUGH */  
         case (NODE_REFSECT2):          case (NODE_REFSECT2):
                 /* FALLTHROUGH */  
         case (NODE_REFSECT3):          case (NODE_REFSECT3):
                 /* FALLTHROUGH */  
         case (NODE_REFSECTION):          case (NODE_REFSECTION):
                 /* FALLTHROUGH */          case (NODE_CHAPTER):
           case (NODE_SECT1):
           case (NODE_SECT2):
           case (NODE_SECTION):
         case (NODE_NOTE):          case (NODE_NOTE):
                 /* FALLTHROUGH */  
         case (NODE_TIP):          case (NODE_TIP):
                 /* FALLTHROUGH */  
         case (NODE_CAUTION):          case (NODE_CAUTION):
                 /* FALLTHROUGH */  
         case (NODE_WARNING):          case (NODE_WARNING):
                 assert(p->newln);                  assert(p->newln);
                 pnode_printrefsect(p, pn);                  pnode_printrefsect(p, pn);
Line 1420  pnode_print(struct parse *p, struct pnode *pn)
Line 1488  pnode_print(struct parse *p, struct pnode *pn)
   
                 /*                  /*
                  * Output all characters, squeezing out whitespace                   * Output all characters, squeezing out whitespace
                  * between newlines.                   * between newlines.
                  * XXX: all whitespace, including tabs (?).                   * XXX: all whitespace, including tabs (?).
                  * Remember to escape control characters and escapes.                   * Remember to escape control characters and escapes.
                  */                   */
Line 1439  pnode_print(struct parse *p, struct pnode *pn)
Line 1507  pnode_print(struct parse *p, struct pnode *pn)
                 for (last = '\n'; '\0' != *cp; ) {                  for (last = '\n'; '\0' != *cp; ) {
                         if ('\n' == last) {                          if ('\n' == last) {
                                 /* Consume all whitespace. */                                  /* Consume all whitespace. */
                                 if (isspace((int)*cp)) {                                  if (isspace((unsigned char)*cp)) {
                                         while (isspace((int)*cp))                                          while (isspace((unsigned char)*cp))
                                                 cp++;                                                  cp++;
                                         continue;                                          continue;
                                 } else if ('\'' == *cp || '.' == *cp)                                  } else if ('\'' == *cp || '.' == *cp)
Line 1453  pnode_print(struct parse *p, struct pnode *pn)
Line 1521  pnode_print(struct parse *p, struct pnode *pn)
                 }                  }
                 p->newln = 0;                  p->newln = 0;
                 break;                  break;
           case (NODE_TITLE):
                   if (pn->parent->node == NODE_BOOKINFO) {
                           pnode_printmopen(p);
                           fputs("Nd", stdout);
                   }
                   break;
         case (NODE_TYPE):          case (NODE_TYPE):
                 pnode_printmopen(p);                  pnode_printmopen(p);
                 fputs("Vt", stdout);                  fputs("Vt", stdout);
Line 1482  pnode_print(struct parse *p, struct pnode *pn)
Line 1556  pnode_print(struct parse *p, struct pnode *pn)
                 pnode_print(p, pp);                  pnode_print(p, pp);
   
         switch (pn->node) {          switch (pn->node) {
         case (NODE_MML_MATH):          case (NODE_INFORMALEQUATION):
                 if ( ! p->newln)                  if ( ! p->newln)
                         putchar('\n');                          putchar('\n');
                 puts(".EN");                  puts(".EN");
                 p->newln = 1;                  p->newln = 1;
                 break;                  break;
           case (NODE_INLINEEQUATION):
                   fputs("$ ", stdout);
                   p->newln = sv;
                   break;
         case (NODE_MML_MROW):          case (NODE_MML_MROW):
         case (NODE_MML_MI):          case (NODE_MML_MI):
         case (NODE_MML_MN):          case (NODE_MML_MN):
         case (NODE_MML_MO):          case (NODE_MML_MO):
                 putchar('}');                  if (TAILQ_EMPTY(&pn->childq))
                           break;
                   fputs(" } ", stdout);
                 break;                  break;
         case (NODE_APPLICATION):          case (NODE_APPLICATION):
         case (NODE_ARG):          case (NODE_ARG):
           case (NODE_AUTHOR):
         case (NODE_CITEREFENTRY):          case (NODE_CITEREFENTRY):
         case (NODE_CODE):          case (NODE_CODE):
         case (NODE_COMMAND):          case (NODE_COMMAND):
         case (NODE_CONSTANT):          case (NODE_CONSTANT):
           case (NODE_EDITOR):
         case (NODE_EMPHASIS):          case (NODE_EMPHASIS):
         case (NODE_ENVAR):          case (NODE_ENVAR):
         case (NODE_FILENAME):          case (NODE_FILENAME):
Line 1531  pnode_print(struct parse *p, struct pnode *pn)
Line 1613  pnode_print(struct parse *p, struct pnode *pn)
                  * <refname> macros in sequence, then print out a                   * <refname> macros in sequence, then print out a
                  * trailing comma before the newline.                   * trailing comma before the newline.
                  */                   */
                 if (NULL != pn->parent &&                  if (NULL != pn->parent &&
                         NODE_REFNAMEDIV == pn->parent->node &&                          NODE_REFNAMEDIV == pn->parent->node &&
                         NULL != TAILQ_NEXT(pn, child) &&                          NULL != TAILQ_NEXT(pn, child) &&
                         NODE_REFNAME == TAILQ_NEXT(pn, child)->node)                          NODE_REFNAME == TAILQ_NEXT(pn, child)->node)
                         fputs(" ,", stdout);                          fputs(" ,", stdout);
                 pnode_printmclose(p, sv);                  pnode_printmclose(p, sv);
                 break;                  break;
           case (NODE_PREFACE):
           case (NODE_REFSECT1):
           case (NODE_REFSECT2):
           case (NODE_REFSECT3):
           case (NODE_REFSECTION):
           case (NODE_CHAPTER):
           case (NODE_SECT1):
           case (NODE_SECT2):
           case (NODE_SECTION):
           case (NODE_NOTE):
           case (NODE_TIP):
           case (NODE_CAUTION):
           case (NODE_WARNING):
                   p->level--;
                   break;
           case (NODE_LITERALLAYOUT):
                   /* FALLTHROUGH */
         case (NODE_PROGRAMLISTING):          case (NODE_PROGRAMLISTING):
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case (NODE_SCREEN):          case (NODE_SCREEN):
Line 1545  pnode_print(struct parse *p, struct pnode *pn)
Line 1644  pnode_print(struct parse *p, struct pnode *pn)
                 puts(".Ed");                  puts(".Ed");
                 p->newln = 1;                  p->newln = 1;
                 break;                  break;
           case (NODE_TITLE):
                   if (pn->parent->node == NODE_BOOKINFO) {
                           pnode_printmclose(p, 1);
                           puts(".Sh AUTHORS");
                   }
                   break;
         default:          default:
                 break;                  break;
         }          }
Line 1555  pnode_print(struct parse *p, struct pnode *pn)
Line 1660  pnode_print(struct parse *p, struct pnode *pn)
  * Invoke the parser context with each buffer fill.   * Invoke the parser context with each buffer fill.
  */   */
 static int  static int
 readfile(XML_Parser xp, int fd,  readfile(XML_Parser xp, int fd,
         char *b, size_t bsz, const char *fn)          char *b, size_t bsz, const char *fn)
 {  {
         struct parse     p;          struct parse     p;
Line 1576  readfile(XML_Parser xp, int fd, 
Line 1681  readfile(XML_Parser xp, int fd, 
                 if (0 == (rc = XML_Parse(xp, b, ssz, 0 == ssz)))                  if (0 == (rc = XML_Parse(xp, b, ssz, 0 == ssz)))
                         fprintf(stderr, "%s:%zu:%zu: %s\n", fn,                          fprintf(stderr, "%s:%zu:%zu: %s\n", fn,
                                 XML_GetCurrentLineNumber(xp),                                  XML_GetCurrentLineNumber(xp),
                                 XML_GetCurrentColumnNumber(xp),                                  XML_GetCurrentColumnNumber(xp),
                                 XML_ErrorString                                  XML_ErrorString
                                 (XML_GetErrorCode(xp)));                                  (XML_GetErrorCode(xp)));
                 else if ( ! p.stop && ssz > 0)                  else if ( ! p.stop && ssz > 0)
                         continue;                          continue;
                 /*                  /*
                  * Exit when we've read all or errors have occured                   * Exit when we've read all or errors have occured
                  * during the parse sequence.                   * during the parse sequence.
                  */                   */
Line 1632  main(int argc, char *argv[])
Line 1737  main(int argc, char *argv[])
         argc -= optind;          argc -= optind;
         argv += optind;          argv += optind;
   
         if (argc > 1)          if (argc > 1) {
                 return(EXIT_FAILURE);                  fprintf(stderr, "%s: Too many arguments\n", argv[1]);
         else if (argc > 0)                  goto usage;
           } else if (argc > 0)
                 fname = argv[0];                  fname = argv[0];
   
         /* Read from stdin or a file. */          /* Read from stdin or a file. */
         fd = 0 == strcmp(fname, "-") ?          fd = 0 == strcmp(fname, "-") ?
                 STDIN_FILENO : open(fname, O_RDONLY, 0);                  STDIN_FILENO : open(fname, O_RDONLY, 0);
   
         /*          /*
Line 1663  main(int argc, char *argv[])
Line 1769  main(int argc, char *argv[])
         return(rc ? EXIT_SUCCESS : EXIT_FAILURE);          return(rc ? EXIT_SUCCESS : EXIT_FAILURE);
   
 usage:  usage:
         fprintf(stderr, "usage: %s [-W]\n", progname);          fprintf(stderr, "usage: %s [-W] [input_filename]\n", progname);
         return(EXIT_FAILURE);          return(EXIT_FAILURE);
 }  }
Legend:
Removed from v.1.42  
changed lines
  Added in v.1.52
CVSweb