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

Diff for /mandoc/man.c between version 1.94 and 1.106

version 1.94, 2011/01/01 12:59:17 version 1.106, 2011/03/23 12:33:01
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
  *   *
  * 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 26 
Line 26 
 #include <stdio.h>  #include <stdio.h>
 #include <string.h>  #include <string.h>
   
   #include "man.h"
 #include "mandoc.h"  #include "mandoc.h"
 #include "libman.h"  #include "libman.h"
 #include "libmandoc.h"  #include "libmandoc.h"
Line 44  const char *const __man_macronames[MAN_MAX] = {   
Line 45  const char *const __man_macronames[MAN_MAX] = {   
   
 const   char * const *man_macronames = __man_macronames;  const   char * const *man_macronames = __man_macronames;
   
 static  struct man_node *man_node_alloc(int, int,  static  struct man_node *man_node_alloc(struct man *, int, int,
                                 enum man_type, enum mant);                                  enum man_type, enum mant);
 static  int              man_node_append(struct man *,  static  int              man_node_append(struct man *,
                                 struct man_node *);                                  struct man_node *);
 static  int              man_span_alloc(struct man *,  
                                 const struct tbl_span *);  
 static  void             man_node_free(struct man_node *);  static  void             man_node_free(struct man_node *);
 static  void             man_node_unlink(struct man *,  static  void             man_node_unlink(struct man *,
                                 struct man_node *);                                  struct man_node *);
Line 64  const struct man_node *
Line 63  const struct man_node *
 man_node(const struct man *m)  man_node(const struct man *m)
 {  {
   
         return(MAN_HALT & m->flags ? NULL : m->first);          assert( ! (MAN_HALT & m->flags));
           return(m->first);
 }  }
   
   
Line 72  const struct man_meta *
Line 72  const struct man_meta *
 man_meta(const struct man *m)  man_meta(const struct man *m)
 {  {
   
         return(MAN_HALT & m->flags ? NULL : &m->meta);          assert( ! (MAN_HALT & m->flags));
           return(&m->meta);
 }  }
   
   
Line 95  man_free(struct man *man)
Line 96  man_free(struct man *man)
   
   
 struct man *  struct man *
 man_alloc(struct regset *regs, void *data, mandocmsg msg)  man_alloc(struct regset *regs, struct mparse *parse)
 {  {
         struct man      *p;          struct man      *p;
   
         p = mandoc_calloc(1, sizeof(struct man));          p = mandoc_calloc(1, sizeof(struct man));
   
         man_hash_init();          man_hash_init();
         p->data = data;          p->parse = parse;
         p->msg = msg;  
         p->regs = regs;          p->regs = regs;
   
         man_alloc1(p);          man_alloc1(p);
Line 115  int
Line 115  int
 man_endparse(struct man *m)  man_endparse(struct man *m)
 {  {
   
         if (MAN_HALT & m->flags)          assert( ! (MAN_HALT & m->flags));
                 return(0);          if (man_macroend(m))
         else if (man_macroend(m))  
                 return(1);                  return(1);
         m->flags |= MAN_HALT;          m->flags |= MAN_HALT;
         return(0);          return(0);
Line 128  int
Line 127  int
 man_parseln(struct man *m, int ln, char *buf, int offs)  man_parseln(struct man *m, int ln, char *buf, int offs)
 {  {
   
         if (MAN_HALT & m->flags)          m->flags |= MAN_NEWLINE;
                 return(0);  
   
           assert( ! (MAN_HALT & m->flags));
         return(('.' == buf[offs] || '\'' == buf[offs]) ?          return(('.' == buf[offs] || '\'' == buf[offs]) ?
                         man_pmacro(m, ln, buf, offs) :                          man_pmacro(m, ln, buf, offs) :
                         man_ptext(m, ln, buf, offs));                          man_ptext(m, ln, buf, offs));
Line 147  man_free1(struct man *man)
Line 146  man_free1(struct man *man)
                 free(man->meta.title);                  free(man->meta.title);
         if (man->meta.source)          if (man->meta.source)
                 free(man->meta.source);                  free(man->meta.source);
         if (man->meta.rawdate)          if (man->meta.date)
                 free(man->meta.rawdate);                  free(man->meta.date);
         if (man->meta.vol)          if (man->meta.vol)
                 free(man->meta.vol);                  free(man->meta.vol);
         if (man->meta.msec)          if (man->meta.msec)
Line 204  man_node_append(struct man *man, struct man_node *p)
Line 203  man_node_append(struct man *man, struct man_node *p)
                 assert(MAN_BLOCK == p->parent->type);                  assert(MAN_BLOCK == p->parent->type);
                 p->parent->head = p;                  p->parent->head = p;
                 break;                  break;
           case (MAN_TAIL):
                   assert(MAN_BLOCK == p->parent->type);
                   p->parent->tail = p;
                   break;
         case (MAN_BODY):          case (MAN_BODY):
                 assert(MAN_BLOCK == p->parent->type);                  assert(MAN_BLOCK == p->parent->type);
                 p->parent->body = p;                  p->parent->body = p;
Line 230  man_node_append(struct man *man, struct man_node *p)
Line 233  man_node_append(struct man *man, struct man_node *p)
   
   
 static struct man_node *  static struct man_node *
 man_node_alloc(int line, int pos, enum man_type type, enum mant tok)  man_node_alloc(struct man *m, int line, int pos,
                   enum man_type type, enum mant tok)
 {  {
         struct man_node *p;          struct man_node *p;
   
Line 239  man_node_alloc(int line, int pos, enum man_type type, 
Line 243  man_node_alloc(int line, int pos, enum man_type type, 
         p->pos = pos;          p->pos = pos;
         p->type = type;          p->type = type;
         p->tok = tok;          p->tok = tok;
   
           if (MAN_NEWLINE & m->flags)
                   p->flags |= MAN_LINE;
           m->flags &= ~MAN_NEWLINE;
         return(p);          return(p);
 }  }
   
Line 248  man_elem_alloc(struct man *m, int line, int pos, enum 
Line 256  man_elem_alloc(struct man *m, int line, int pos, enum 
 {  {
         struct man_node *p;          struct man_node *p;
   
         p = man_node_alloc(line, pos, MAN_ELEM, tok);          p = man_node_alloc(m, line, pos, MAN_ELEM, tok);
         if ( ! man_node_append(m, p))          if ( ! man_node_append(m, p))
                 return(0);                  return(0);
         m->next = MAN_NEXT_CHILD;          m->next = MAN_NEXT_CHILD;
Line 257  man_elem_alloc(struct man *m, int line, int pos, enum 
Line 265  man_elem_alloc(struct man *m, int line, int pos, enum 
   
   
 int  int
 man_head_alloc(struct man *m, int line, int pos, enum mant tok)  man_tail_alloc(struct man *m, int line, int pos, enum mant tok)
 {  {
         struct man_node *p;          struct man_node *p;
   
         p = man_node_alloc(line, pos, MAN_HEAD, tok);          p = man_node_alloc(m, line, pos, MAN_TAIL, tok);
         if ( ! man_node_append(m, p))          if ( ! man_node_append(m, p))
                 return(0);                  return(0);
         m->next = MAN_NEXT_CHILD;          m->next = MAN_NEXT_CHILD;
Line 270  man_head_alloc(struct man *m, int line, int pos, enum 
Line 278  man_head_alloc(struct man *m, int line, int pos, enum 
   
   
 int  int
 man_body_alloc(struct man *m, int line, int pos, enum mant tok)  man_head_alloc(struct man *m, int line, int pos, enum mant tok)
 {  {
         struct man_node *p;          struct man_node *p;
   
         p = man_node_alloc(line, pos, MAN_BODY, tok);          p = man_node_alloc(m, line, pos, MAN_HEAD, tok);
         if ( ! man_node_append(m, p))          if ( ! man_node_append(m, p))
                 return(0);                  return(0);
         m->next = MAN_NEXT_CHILD;          m->next = MAN_NEXT_CHILD;
Line 283  man_body_alloc(struct man *m, int line, int pos, enum 
Line 291  man_body_alloc(struct man *m, int line, int pos, enum 
   
   
 int  int
 man_block_alloc(struct man *m, int line, int pos, enum mant tok)  man_body_alloc(struct man *m, int line, int pos, enum mant tok)
 {  {
         struct man_node *p;          struct man_node *p;
   
         p = man_node_alloc(line, pos, MAN_BLOCK, tok);          p = man_node_alloc(m, line, pos, MAN_BODY, tok);
         if ( ! man_node_append(m, p))          if ( ! man_node_append(m, p))
                 return(0);                  return(0);
         m->next = MAN_NEXT_CHILD;          m->next = MAN_NEXT_CHILD;
         return(1);          return(1);
 }  }
   
 static int  
 man_span_alloc(struct man *m, const struct tbl_span *span)  int
   man_block_alloc(struct man *m, int line, int pos, enum mant tok)
 {  {
         struct man_node *n;          struct man_node *p;
   
         /* FIXME: grab from span */          p = man_node_alloc(m, line, pos, MAN_BLOCK, tok);
         n = man_node_alloc(0, 0, MAN_TBL, MAN_MAX);          if ( ! man_node_append(m, p))
   
         if ( ! man_node_append(m, n))  
                 return(0);                  return(0);
           m->next = MAN_NEXT_CHILD;
         m->next = MAN_NEXT_SIBLING;  
         return(1);          return(1);
 }  }
   
Line 317  man_word_alloc(struct man *m, int line, int pos, const
Line 323  man_word_alloc(struct man *m, int line, int pos, const
   
         len = strlen(word);          len = strlen(word);
   
         n = man_node_alloc(line, pos, MAN_TEXT, MAN_MAX);          n = man_node_alloc(m, line, pos, MAN_TEXT, MAN_MAX);
         n->string = mandoc_malloc(len + 1);          n->string = mandoc_malloc(len + 1);
         sv = strlcpy(n->string, word, len + 1);          sv = strlcpy(n->string, word, len + 1);
   
Line 357  man_node_delete(struct man *m, struct man_node *p)
Line 363  man_node_delete(struct man *m, struct man_node *p)
         man_node_free(p);          man_node_free(p);
 }  }
   
   int
   man_addeqn(struct man *m, const struct eqn *ep)
   {
           struct man_node *n;
   
           assert( ! (MAN_HALT & m->flags));
   
           n = man_node_alloc(m, ep->line, ep->pos, MAN_EQN, MAN_MAX);
           n->eqn = ep;
   
           if ( ! man_node_append(m, n))
                   return(0);
   
           m->next = MAN_NEXT_SIBLING;
           return(man_descope(m, ep->line, ep->pos));
   }
   
 int  int
 man_addspan(struct man *m, const struct tbl_span *sp)  man_addspan(struct man *m, const struct tbl_span *sp)
 {  {
           struct man_node *n;
   
         if ( ! man_span_alloc(m, sp))          assert( ! (MAN_HALT & m->flags));
   
           n = man_node_alloc(m, sp->line, 0, MAN_TBL, MAN_MAX);
           n->span = sp;
   
           if ( ! man_node_append(m, n))
                 return(0);                  return(0);
         return(man_descope(m, 0, 0));  
           m->next = MAN_NEXT_SIBLING;
           return(man_descope(m, sp->line, 0));
 }  }
   
 static int  static int
Line 464  man_ptext(struct man *m, int line, char *buf, int offs
Line 494  man_ptext(struct man *m, int line, char *buf, int offs
 }  }
   
   
 int  static int
 man_pmacro(struct man *m, int ln, char *buf, int offs)  man_pmacro(struct man *m, int ln, char *buf, int offs)
 {  {
         int              i, j, ppos;          int              i, j, ppos;
Line 508  man_pmacro(struct man *m, int ln, char *buf, int offs)
Line 538  man_pmacro(struct man *m, int ln, char *buf, int offs)
   
         tok = (j > 0 && j < 4) ? man_hash_find(mac) : MAN_MAX;          tok = (j > 0 && j < 4) ? man_hash_find(mac) : MAN_MAX;
         if (MAN_MAX == tok) {          if (MAN_MAX == tok) {
                 man_vmsg(m, MANDOCERR_MACRO, ln, ppos, "%s", buf + ppos - 1);                  mandoc_vmsg(MANDOCERR_MACRO, m->parse, ln,
                                   ppos, "%s", buf + ppos - 1);
                 return(1);                  return(1);
         }          }
   
Line 541  man_pmacro(struct man *m, int ln, char *buf, int offs)
Line 572  man_pmacro(struct man *m, int ln, char *buf, int offs)
                 if (MAN_NSCOPED & man_macros[n->tok].flags)                  if (MAN_NSCOPED & man_macros[n->tok].flags)
                         n = n->parent;                          n = n->parent;
   
                 man_vmsg(m, MANDOCERR_LINESCOPE, n->line, n->pos,                  mandoc_vmsg(MANDOCERR_LINESCOPE, m->parse, n->line,
                                 "%s", man_macronames[n->tok]);                                  n->pos, "%s", man_macronames[n->tok]);
   
                 man_node_delete(m, n);                  man_node_delete(m, n);
                 m->flags &= ~MAN_ELINE;                  m->flags &= ~MAN_ELINE;
Line 607  err: /* Error out. */
Line 638  err: /* Error out. */
         m->flags |= MAN_HALT;          m->flags |= MAN_HALT;
         return(0);          return(0);
 }  }
   
   
 int  
 man_vmsg(struct man *man, enum mandocerr t,  
                 int ln, int pos, const char *fmt, ...)  
 {  
         char             buf[256];  
         va_list          ap;  
   
         va_start(ap, fmt);  
         vsnprintf(buf, sizeof(buf) - 1, fmt, ap);  
         va_end(ap);  
         return((*man->msg)(t, man->data, ln, pos, buf));  
 }  
   
   
 /*  /*
  * Unlink a node from its context.  If "m" is provided, the last parse   * Unlink a node from its context.  If "m" is provided, the last parse
Legend:
Removed from v.1.94  
changed lines
  Added in v.1.106
CVSweb