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

Diff for /mandoc/man.c between version 1.150 and 1.158

version 1.150, 2015/04/02 21:36:49 version 1.158, 2015/04/19 13:50:25
Line 32 
Line 32 
 #include "roff.h"  #include "roff.h"
 #include "man.h"  #include "man.h"
 #include "libmandoc.h"  #include "libmandoc.h"
   #include "roff_int.h"
 #include "libman.h"  #include "libman.h"
   
 const   char *const __man_macronames[MAN_MAX] = {  const   char *const __man_macronames[MAN_MAX] = {
Line 49  const char *const __man_macronames[MAN_MAX] = {
Line 50  const char *const __man_macronames[MAN_MAX] = {
   
 const   char * const *man_macronames = __man_macronames;  const   char * const *man_macronames = __man_macronames;
   
 static  void             man_alloc1(struct man *);  static  void             man_breakscope(struct roff_man *, int);
 static  void             man_breakscope(struct man *, enum mant);  static  void             man_descope(struct roff_man *, int, int);
 static  void             man_descope(struct man *, int, int);  static  int              man_ptext(struct roff_man *, int, char *, int);
 static  void             man_free1(struct man *);  static  int              man_pmacro(struct roff_man *, int, char *, int);
 static  struct man_node *man_node_alloc(struct man *, int, int,  
                                 enum roff_type, enum mant);  
 static  void             man_node_append(struct man *, struct man_node *);  
 static  void             man_node_free(struct man_node *);  
 static  void             man_node_unlink(struct man *,  
                                 struct man_node *);  
 static  int              man_ptext(struct man *, int, char *, int);  
 static  int              man_pmacro(struct man *, int, char *, int);  
   
   
 const struct man_node *  
 man_node(const struct man *man)  
 {  
   
         return(man->first);  
 }  
   
 const struct man_meta *  
 man_meta(const struct man *man)  
 {  
   
         return(&man->meta);  
 }  
   
 void  void
 man_reset(struct man *man)  man_endparse(struct roff_man *man)
 {  {
   
         man_free1(man);  
         man_alloc1(man);  
 }  
   
 void  
 man_free(struct man *man)  
 {  
   
         man_free1(man);  
         free(man);  
 }  
   
 struct man *  
 man_alloc(struct roff *roff, struct mparse *parse,  
         const char *defos, int quick)  
 {  
         struct man      *p;  
   
         p = mandoc_calloc(1, sizeof(struct man));  
   
         man_hash_init();  
         p->parse = parse;  
         p->defos = defos;  
         p->quick = quick;  
         p->roff = roff;  
   
         man_alloc1(p);  
         return(p);  
 }  
   
 void  
 man_endparse(struct man *man)  
 {  
   
         man_macroend(man);          man_macroend(man);
 }  }
   
 int  int
 man_parseln(struct man *man, int ln, char *buf, int offs)  man_parseln(struct roff_man *man, int ln, char *buf, int offs)
 {  {
   
         if (man->last->type != ROFFT_EQN || ln > man->last->line)          if (man->last->type != ROFFT_EQN || ln > man->last->line)
Line 130  man_parseln(struct man *man, int ln, char *buf, int of
Line 75  man_parseln(struct man *man, int ln, char *buf, int of
             man_ptext(man, ln, buf, offs));              man_ptext(man, ln, buf, offs));
 }  }
   
 static void  
 man_free1(struct man *man)  
 {  
   
         if (man->first)  
                 man_node_delete(man, man->first);  
         free(man->meta.title);  
         free(man->meta.source);  
         free(man->meta.date);  
         free(man->meta.vol);  
         free(man->meta.msec);  
 }  
   
 static void  
 man_alloc1(struct man *man)  
 {  
   
         memset(&man->meta, 0, sizeof(struct man_meta));  
         man->flags = 0;  
         man->last = mandoc_calloc(1, sizeof(struct man_node));  
         man->first = man->last;  
         man->last->type = ROFFT_ROOT;  
         man->last->tok = MAN_MAX;  
         man->next = MAN_NEXT_CHILD;  
 }  
   
   
 static void  
 man_node_append(struct man *man, struct man_node *p)  
 {  
   
         assert(man->last);  
         assert(man->first);  
         assert(p->type != ROFFT_ROOT);  
   
         switch (man->next) {  
         case MAN_NEXT_SIBLING:  
                 man->last->next = p;  
                 p->prev = man->last;  
                 p->parent = man->last->parent;  
                 break;  
         case MAN_NEXT_CHILD:  
                 man->last->child = p;  
                 p->parent = man->last;  
                 break;  
         default:  
                 abort();  
                 /* NOTREACHED */  
         }  
   
         assert(p->parent);  
         p->parent->nchild++;  
   
         switch (p->type) {  
         case ROFFT_BLOCK:  
                 if (p->tok == MAN_SH || p->tok == MAN_SS)  
                         man->flags &= ~MAN_LITERAL;  
                 break;  
         case ROFFT_HEAD:  
                 assert(p->parent->type == ROFFT_BLOCK);  
                 p->parent->head = p;  
                 break;  
         case ROFFT_BODY:  
                 assert(p->parent->type == ROFFT_BLOCK);  
                 p->parent->body = p;  
                 break;  
         default:  
                 break;  
         }  
   
         man->last = p;  
   
         switch (p->type) {  
         case ROFFT_TBL:  
                 /* FALLTHROUGH */  
         case ROFFT_TEXT:  
                 man_valid_post(man);  
                 break;  
         default:  
                 break;  
         }  
 }  
   
 static struct man_node *  
 man_node_alloc(struct man *man, int line, int pos,  
                 enum roff_type type, enum mant tok)  
 {  
         struct man_node *p;  
   
         p = mandoc_calloc(1, sizeof(struct man_node));  
         p->line = line;  
         p->pos = pos;  
         p->type = type;  
         p->tok = tok;  
   
         if (man->flags & MAN_NEWLINE)  
                 p->flags |= MAN_LINE;  
         man->flags &= ~MAN_NEWLINE;  
         return(p);  
 }  
   
 void  void
 man_elem_alloc(struct man *man, int line, int pos, enum mant tok)  man_elem_alloc(struct roff_man *man, int line, int pos, int tok)
 {  {
         struct man_node *p;          struct roff_node *p;
   
         p = man_node_alloc(man, line, pos, ROFFT_ELEM, tok);          p = roff_node_alloc(man, line, pos, ROFFT_ELEM, tok);
         man_node_append(man, p);          roff_node_append(man, p);
         man->next = MAN_NEXT_CHILD;          man->next = ROFF_NEXT_CHILD;
 }  }
   
 void  void
 man_head_alloc(struct man *man, int line, int pos, enum mant tok)  man_block_alloc(struct roff_man *man, int line, int pos, int tok)
 {  {
         struct man_node *p;          struct roff_node *p;
   
         p = man_node_alloc(man, line, pos, ROFFT_HEAD, tok);          p = roff_node_alloc(man, line, pos, ROFFT_BLOCK, tok);
         man_node_append(man, p);          roff_node_append(man, p);
         man->next = MAN_NEXT_CHILD;          man->next = ROFF_NEXT_CHILD;
 }  }
   
 void  void
 man_body_alloc(struct man *man, int line, int pos, enum mant tok)  man_word_alloc(struct roff_man *man, int line, int pos, const char *word)
 {  {
         struct man_node *p;          struct roff_node *n;
   
         p = man_node_alloc(man, line, pos, ROFFT_BODY, tok);          n = roff_node_alloc(man, line, pos, ROFFT_TEXT, MAN_MAX);
         man_node_append(man, p);  
         man->next = MAN_NEXT_CHILD;  
 }  
   
 void  
 man_block_alloc(struct man *man, int line, int pos, enum mant tok)  
 {  
         struct man_node *p;  
   
         p = man_node_alloc(man, line, pos, ROFFT_BLOCK, tok);  
         man_node_append(man, p);  
         man->next = MAN_NEXT_CHILD;  
 }  
   
 void  
 man_word_alloc(struct man *man, int line, int pos, const char *word)  
 {  
         struct man_node *n;  
   
         n = man_node_alloc(man, line, pos, ROFFT_TEXT, MAN_MAX);  
         n->string = roff_strdup(man->roff, word);          n->string = roff_strdup(man->roff, word);
         man_node_append(man, n);          roff_node_append(man, n);
         man->next = MAN_NEXT_SIBLING;          man_valid_post(man);
           man->next = ROFF_NEXT_SIBLING;
 }  }
   
 void  void
 man_word_append(struct man *man, const char *word)  man_word_append(struct roff_man *man, const char *word)
 {  {
         struct man_node *n;          struct roff_node *n;
         char            *addstr, *newstr;          char            *addstr, *newstr;
   
         n = man->last;          n = man->last;
Line 294  man_word_append(struct man *man, const char *word)
Line 119  man_word_append(struct man *man, const char *word)
         free(addstr);          free(addstr);
         free(n->string);          free(n->string);
         n->string = newstr;          n->string = newstr;
         man->next = MAN_NEXT_SIBLING;          man->next = ROFF_NEXT_SIBLING;
 }  }
   
 /*  
  * Free all of the resources held by a node.  This does NOT unlink a  
  * node from its context; for that, see man_node_unlink().  
  */  
 static void  
 man_node_free(struct man_node *p)  
 {  
   
         free(p->string);  
         free(p);  
 }  
   
 void  void
 man_node_delete(struct man *man, struct man_node *p)  man_addeqn(struct roff_man *man, const struct eqn *ep)
 {  {
           struct roff_node *n;
   
         while (p->child)          n = roff_node_alloc(man, ep->ln, ep->pos, ROFFT_EQN, MAN_MAX);
                 man_node_delete(man, p->child);  
   
         man_node_unlink(man, p);  
         man_node_free(p);  
 }  
   
 void  
 man_addeqn(struct man *man, const struct eqn *ep)  
 {  
         struct man_node *n;  
   
         n = man_node_alloc(man, ep->ln, ep->pos, ROFFT_EQN, MAN_MAX);  
         n->eqn = ep;          n->eqn = ep;
         if (ep->ln > man->last->line)          if (ep->ln > man->last->line)
                 n->flags |= MAN_LINE;                  n->flags |= MAN_LINE;
         man_node_append(man, n);          roff_node_append(man, n);
         man->next = MAN_NEXT_SIBLING;          man->next = ROFF_NEXT_SIBLING;
         man_descope(man, ep->ln, ep->pos);          man_descope(man, ep->ln, ep->pos);
 }  }
   
 void  void
 man_addspan(struct man *man, const struct tbl_span *sp)  man_addspan(struct roff_man *man, const struct tbl_span *sp)
 {  {
         struct man_node *n;          struct roff_node *n;
   
         man_breakscope(man, MAN_MAX);          man_breakscope(man, MAN_MAX);
         n = man_node_alloc(man, sp->line, 0, ROFFT_TBL, MAN_MAX);          n = roff_node_alloc(man, sp->line, 0, ROFFT_TBL, MAN_MAX);
         n->span = sp;          n->span = sp;
         man_node_append(man, n);          roff_node_append(man, n);
         man->next = MAN_NEXT_SIBLING;          man_valid_post(man);
           man->next = ROFF_NEXT_SIBLING;
         man_descope(man, sp->line, 0);          man_descope(man, sp->line, 0);
 }  }
   
 static void  static void
 man_descope(struct man *man, int line, int offs)  man_descope(struct roff_man *man, int line, int offs)
 {  {
         /*          /*
          * Co-ordinate what happens with having a next-line scope open:           * Co-ordinate what happens with having a next-line scope open:
Line 364  man_descope(struct man *man, int line, int offs)
Line 167  man_descope(struct man *man, int line, int offs)
                 return;                  return;
         man->flags &= ~MAN_BLINE;          man->flags &= ~MAN_BLINE;
         man_unscope(man, man->last->parent);          man_unscope(man, man->last->parent);
         man_body_alloc(man, line, offs, man->last->tok);          roff_body_alloc(man, line, offs, man->last->tok);
 }  }
   
 static int  static int
 man_ptext(struct man *man, int line, char *buf, int offs)  man_ptext(struct roff_man *man, int line, char *buf, int offs)
 {  {
         int              i;          int              i;
   
Line 393  man_ptext(struct man *man, int line, char *buf, int of
Line 196  man_ptext(struct man *man, int line, char *buf, int of
                 if (man->last->tok != MAN_SH &&                  if (man->last->tok != MAN_SH &&
                     man->last->tok != MAN_SS) {                      man->last->tok != MAN_SS) {
                         man_elem_alloc(man, line, offs, MAN_sp);                          man_elem_alloc(man, line, offs, MAN_sp);
                         man->next = MAN_NEXT_SIBLING;                          man->next = ROFF_NEXT_SIBLING;
                 }                  }
                 return(1);                  return(1);
         }          }
Line 436  man_ptext(struct man *man, int line, char *buf, int of
Line 239  man_ptext(struct man *man, int line, char *buf, int of
 }  }
   
 static int  static int
 man_pmacro(struct man *man, int ln, char *buf, int offs)  man_pmacro(struct roff_man *man, int ln, char *buf, int offs)
 {  {
         struct man_node *n;          struct roff_node *n;
         const char      *cp;          const char      *cp;
         enum mant        tok;          int              tok;
         int              i, ppos;          int              i, ppos;
         int              bline;          int              bline;
         char             mac[5];          char             mac[5];
Line 531  man_pmacro(struct man *man, int ln, char *buf, int off
Line 334  man_pmacro(struct man *man, int ln, char *buf, int off
         man->flags &= ~MAN_BLINE;          man->flags &= ~MAN_BLINE;
   
         man_unscope(man, man->last->parent);          man_unscope(man, man->last->parent);
         man_body_alloc(man, ln, ppos, man->last->tok);          roff_body_alloc(man, ln, ppos, man->last->tok);
         return(1);          return(1);
 }  }
   
 void  void
 man_breakscope(struct man *man, enum mant tok)  man_breakscope(struct roff_man *man, int tok)
 {  {
         struct man_node *n;          struct roff_node *n;
   
         /*          /*
          * An element next line scope is open,           * An element next line scope is open,
Line 558  man_breakscope(struct man *man, enum mant tok)
Line 361  man_breakscope(struct man *man, enum mant tok)
                     tok == MAN_MAX ? "TS" : man_macronames[tok],                      tok == MAN_MAX ? "TS" : man_macronames[tok],
                     man_macronames[n->tok]);                      man_macronames[n->tok]);
   
                 man_node_delete(man, n);                  roff_node_delete(man, n);
                 man->flags &= ~MAN_ELINE;                  man->flags &= ~MAN_ELINE;
         }          }
   
Line 586  man_breakscope(struct man *man, enum mant tok)
Line 389  man_breakscope(struct man *man, enum mant tok)
                     tok == MAN_MAX ? "TS" : man_macronames[tok],                      tok == MAN_MAX ? "TS" : man_macronames[tok],
                     man_macronames[n->tok]);                      man_macronames[n->tok]);
   
                 man_node_delete(man, n);                  roff_node_delete(man, n);
                 man->flags &= ~MAN_BLINE;                  man->flags &= ~MAN_BLINE;
         }          }
 }  }
   
 /*  
  * Unlink a node from its context.  If "man" is provided, the last parse  
  * point will also be adjusted accordingly.  
  */  
 static void  
 man_node_unlink(struct man *man, struct man_node *n)  
 {  
   
         /* Adjust siblings. */  
   
         if (n->prev)  
                 n->prev->next = n->next;  
         if (n->next)  
                 n->next->prev = n->prev;  
   
         /* Adjust parent. */  
   
         if (n->parent) {  
                 n->parent->nchild--;  
                 if (n->parent->child == n)  
                         n->parent->child = n->prev ? n->prev : n->next;  
         }  
   
         /* Adjust parse point, if applicable. */  
   
         if (man && man->last == n) {  
                 /*XXX: this can occur when bailing from validation. */  
                 /*assert(NULL == n->next);*/  
                 if (n->prev) {  
                         man->last = n->prev;  
                         man->next = MAN_NEXT_SIBLING;  
                 } else {  
                         man->last = n->parent;  
                         man->next = MAN_NEXT_CHILD;  
                 }  
         }  
   
         if (man && man->first == n)  
                 man->first = NULL;  
 }  
   
 const struct mparse *  const struct mparse *
 man_mparse(const struct man *man)  man_mparse(const struct roff_man *man)
 {  {
   
         assert(man && man->parse);          assert(man && man->parse);
Line 641  man_mparse(const struct man *man)
Line 403  man_mparse(const struct man *man)
 }  }
   
 void  void
 man_deroff(char **dest, const struct man_node *n)  man_deroff(char **dest, const struct roff_node *n)
 {  {
         char    *cp;          char    *cp;
         size_t   sz;          size_t   sz;
Legend:
Removed from v.1.150  
changed lines
  Added in v.1.158
CVSweb