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

Diff for /mandoc/mdoc_macro.c between version 1.57 and 1.61

version 1.57, 2010/05/07 06:05:38 version 1.61, 2010/05/13 11:34:45
Line 45  static int    obsolete(MACRO_PROT_ARGS);
Line 45  static int    obsolete(MACRO_PROT_ARGS);
   
 static  int             append_delims(struct mdoc *,  static  int             append_delims(struct mdoc *,
                                 int, int *, char *);                                  int, int *, char *);
 static  enum mdoct      lookup(int, const char *);  static  enum mdoct      lookup(enum mdoct, const char *);
 static  enum mdoct      lookup_raw(const char *);  static  enum mdoct      lookup_raw(const char *);
 static  int             phrase(struct mdoc *, int, int, char *);  static  int             phrase(struct mdoc *, int, int,
                                   char *, enum margserr, int);
 static  enum mdoct      rew_alt(enum mdoct);  static  enum mdoct      rew_alt(enum mdoct);
 static  int             rew_dobreak(enum mdoct,  static  int             rew_dobreak(enum mdoct,
                                 const struct mdoc_node *);                                  const struct mdoc_node *);
Line 267  mdoc_macroend(struct mdoc *m)
Line 268  mdoc_macroend(struct mdoc *m)
  * Look up a macro from within a subsequent context.   * Look up a macro from within a subsequent context.
  */   */
 static enum mdoct  static enum mdoct
 lookup(int from, const char *p)  lookup(enum mdoct from, const char *p)
 {  {
         /* FIXME: make -diag lists be un-PARSED. */          /* FIXME: make -diag lists be un-PARSED. */
   
Line 283  lookup(int from, const char *p)
Line 284  lookup(int from, const char *p)
 static enum mdoct  static enum mdoct
 lookup_raw(const char *p)  lookup_raw(const char *p)
 {  {
         int              res;          enum mdoct       res;
   
         if (MDOC_MAX == (res = mdoc_hash_find(p)))          if (MDOC_MAX == (res = mdoc_hash_find(p)))
                 return(MDOC_MAX);                  return(MDOC_MAX);
Line 652  append_delims(struct mdoc *mdoc, int line, int *pos, c
Line 653  append_delims(struct mdoc *mdoc, int line, int *pos, c
 static int  static int
 blk_exp_close(MACRO_PROT_ARGS)  blk_exp_close(MACRO_PROT_ARGS)
 {  {
         int              j, lastarg, maxargs, flushed;          int              j, lastarg, maxargs, flushed, nl;
         enum margserr    ac;          enum margserr    ac;
         enum mdoct       ntok;          enum mdoct       ntok;
         char            *p;          char            *p;
   
           nl = MDOC_NEWLINE & m->flags;
   
         switch (tok) {          switch (tok) {
         case (MDOC_Ec):          case (MDOC_Ec):
                 maxargs = 1;                  maxargs = 1;
Line 722  blk_exp_close(MACRO_PROT_ARGS)
Line 725  blk_exp_close(MACRO_PROT_ARGS)
         if ( ! flushed && ! rew_sub(MDOC_BLOCK, m, tok, line, ppos))          if ( ! flushed && ! rew_sub(MDOC_BLOCK, m, tok, line, ppos))
                 return(0);                  return(0);
   
         if (ppos > 1)          if ( ! nl)
                 return(1);                  return(1);
         return(append_delims(m, line, pos, buf));          return(append_delims(m, line, pos, buf));
 }  }
Line 731  blk_exp_close(MACRO_PROT_ARGS)
Line 734  blk_exp_close(MACRO_PROT_ARGS)
 static int  static int
 in_line(MACRO_PROT_ARGS)  in_line(MACRO_PROT_ARGS)
 {  {
         int              la, lastpunct, cnt, d, nc;          int              la, lastpunct, cnt, d, nc, nl;
         enum margverr    av;          enum margverr    av;
         enum mdoct       ntok;          enum mdoct       ntok;
         enum margserr    ac;          enum margserr    ac;
         struct mdoc_arg *arg;          struct mdoc_arg *arg;
         char            *p;          char            *p;
   
           nl = MDOC_NEWLINE & m->flags;
   
         /*          /*
          * Whether we allow ignored elements (those without content,           * Whether we allow ignored elements (those without content,
          * usually because of reserved words) to squeak by.           * usually because of reserved words) to squeak by.
Line 814  in_line(MACRO_PROT_ARGS)
Line 819  in_line(MACRO_PROT_ARGS)
                         }                          }
                         if ( ! mdoc_macro(m, ntok, line, la, pos, buf))                          if ( ! mdoc_macro(m, ntok, line, la, pos, buf))
                                 return(0);                                  return(0);
                         if (ppos > 1)                          if ( ! nl)
                                 return(1);                                  return(1);
                         return(append_delims(m, line, pos, buf));                          return(append_delims(m, line, pos, buf));
                 }                  }
Line 874  in_line(MACRO_PROT_ARGS)
Line 879  in_line(MACRO_PROT_ARGS)
                         return(0);                          return(0);
         }          }
   
         if (ppos > 1)          if ( ! nl)
                 return(1);                  return(1);
         return(append_delims(m, line, pos, buf));          return(append_delims(m, line, pos, buf));
 }  }
Line 883  in_line(MACRO_PROT_ARGS)
Line 888  in_line(MACRO_PROT_ARGS)
 static int  static int
 blk_full(MACRO_PROT_ARGS)  blk_full(MACRO_PROT_ARGS)
 {  {
         int               la;          int               la, pcnt;
         struct mdoc_arg  *arg;          struct mdoc_arg  *arg;
         struct mdoc_node *head; /* save of head macro */          struct mdoc_node *head; /* save of head macro */
         struct mdoc_node *body; /* save of body macro */          struct mdoc_node *body; /* save of body macro */
Line 891  blk_full(MACRO_PROT_ARGS)
Line 896  blk_full(MACRO_PROT_ARGS)
         struct mdoc_node *n;          struct mdoc_node *n;
 #endif  #endif
         enum mdoct        ntok;          enum mdoct        ntok;
         enum margserr     ac;          enum margserr     ac, lac;
         enum margverr     av;          enum margverr     av;
         char             *p;          char             *p;
   
Line 952  blk_full(MACRO_PROT_ARGS)
Line 957  blk_full(MACRO_PROT_ARGS)
                 body = m->last;                  body = m->last;
         }          }
   
         for (;;) {          ac = ARGS_ERROR;
   
           for (pcnt = 0; ; ) {
                 la = *pos;                  la = *pos;
                   lac = ac;
                 ac = mdoc_args(m, line, pos, buf, tok, &p);                  ac = mdoc_args(m, line, pos, buf, tok, &p);
   
                 if (ARGS_ERROR == ac)                  if (ARGS_ERROR == ac)
Line 963  blk_full(MACRO_PROT_ARGS)
Line 971  blk_full(MACRO_PROT_ARGS)
   
                 /* Don't emit leading punct. for phrases. */                  /* Don't emit leading punct. for phrases. */
   
                 if (NULL == head && ARGS_PHRASE != ac &&                  if (NULL == head &&
                                   ARGS_PHRASE != ac &&
                                 ARGS_PPHRASE != ac &&                                  ARGS_PPHRASE != ac &&
                                   ARGS_PEND != ac &&
                                 ARGS_QWORD != ac &&                                  ARGS_QWORD != ac &&
                                 1 == mdoc_isdelim(p)) {                                  1 == mdoc_isdelim(p)) {
                         if ( ! mdoc_word_alloc(m, line, la, p))                          if ( ! mdoc_word_alloc(m, line, la, p))
Line 974  blk_full(MACRO_PROT_ARGS)
Line 984  blk_full(MACRO_PROT_ARGS)
   
                 /* Always re-open head for phrases. */                  /* Always re-open head for phrases. */
   
                 if (NULL == head || ARGS_PHRASE == ac ||                  if (NULL == head ||
                                   ARGS_PHRASE == ac ||
                                   ARGS_PEND == ac ||
                                 ARGS_PPHRASE == ac) {                                  ARGS_PPHRASE == ac) {
                         if ( ! mdoc_head_alloc(m, line, ppos, tok))                          if ( ! mdoc_head_alloc(m, line, ppos, tok))
                                 return(0);                                  return(0);
                         head = m->last;                          head = m->last;
                 }                  }
   
                 if (ARGS_PHRASE == ac || ARGS_PPHRASE == ac) {                  if (ARGS_PHRASE == ac ||
                         if ( ! phrase(m, line, la, buf))                                  ARGS_PEND == ac ||
                                   ARGS_PPHRASE == ac) {
                           /*
                            * Special treatment for the last phrase.  A
                            * prior ARGS_PHRASE gets is handled as a
                            * regular ARGS_PHRASE, but a prior ARGS_PPHRASE
                            * has special handling.
                            */
                           if (ARGS_PEND == ac && ARGS_ERROR == lac)
                                   ac = ARGS_PHRASE;
                           else if (ARGS_PEND == ac && ARGS_PHRASE == lac)
                                   ac = ARGS_PHRASE;
   
                           if ( ! phrase(m, line, la, buf, ac, pcnt++))
                                 return(0);                                  return(0);
                         if ( ! rew_sub(MDOC_HEAD, m, tok, line, ppos))                          if ( ! rew_sub(MDOC_HEAD, m, tok, line, ppos))
                                 return(0);                                  return(0);
Line 1159  blk_part_imp(MACRO_PROT_ARGS)
Line 1184  blk_part_imp(MACRO_PROT_ARGS)
 static int  static int
 blk_part_exp(MACRO_PROT_ARGS)  blk_part_exp(MACRO_PROT_ARGS)
 {  {
         int               la;          int               la, nl;
         enum margserr     ac;          enum margserr     ac;
         struct mdoc_node *head; /* keep track of head */          struct mdoc_node *head; /* keep track of head */
         struct mdoc_node *body; /* keep track of body */          struct mdoc_node *body; /* keep track of body */
         char             *p;          char             *p;
         enum mdoct        ntok;          enum mdoct        ntok;
   
           nl = MDOC_NEWLINE & m->flags;
   
         /*          /*
          * The opening of an explicit macro having zero or more leading           * The opening of an explicit macro having zero or more leading
          * punctuation nodes; a head with optional single element (the           * punctuation nodes; a head with optional single element (the
Line 1258  blk_part_exp(MACRO_PROT_ARGS)
Line 1285  blk_part_exp(MACRO_PROT_ARGS)
   
         /* Standard appending of delimiters. */          /* Standard appending of delimiters. */
   
         if (ppos > 1)          if ( ! nl)
                 return(1);                  return(1);
   
         return(append_delims(m, line, pos, buf));          return(append_delims(m, line, pos, buf));
 }  }
   
   
   /* ARGSUSED */
 static int  static int
 in_line_argn(MACRO_PROT_ARGS)  in_line_argn(MACRO_PROT_ARGS)
 {  {
         int              la, flushed, j, maxargs;          int              la, flushed, j, maxargs, nl;
         enum margserr    ac;          enum margserr    ac;
         enum margverr    av;          enum margverr    av;
         struct mdoc_arg *arg;          struct mdoc_arg *arg;
         char            *p;          char            *p;
         enum mdoct       ntok;          enum mdoct       ntok;
   
           nl = MDOC_NEWLINE & m->flags;
   
         /*          /*
          * A line macro that has a fixed number of arguments (maxargs).           * A line macro that has a fixed number of arguments (maxargs).
          * Only open the scope once the first non-leading-punctuation is           * Only open the scope once the first non-leading-punctuation is
Line 1394  in_line_argn(MACRO_PROT_ARGS)
Line 1423  in_line_argn(MACRO_PROT_ARGS)
   
         if ( ! flushed && ! rew_elem(m, tok))          if ( ! flushed && ! rew_elem(m, tok))
                 return(0);                  return(0);
           if ( ! nl)
         if (ppos > 1)  
                 return(1);                  return(1);
         return(append_delims(m, line, pos, buf));          return(append_delims(m, line, pos, buf));
 }  }
Line 1471  in_line_eoln(MACRO_PROT_ARGS)
Line 1499  in_line_eoln(MACRO_PROT_ARGS)
 static int  static int
 ctx_synopsis(MACRO_PROT_ARGS)  ctx_synopsis(MACRO_PROT_ARGS)
 {  {
           int              nl;
   
           nl = MDOC_NEWLINE & m->flags;
   
         /* If we're not in the SYNOPSIS, go straight to in-line. */          /* If we're not in the SYNOPSIS, go straight to in-line. */
         if (SEC_SYNOPSIS != m->lastsec)          if (SEC_SYNOPSIS != m->lastsec)
                 return(in_line(m, tok, line, ppos, pos, buf));                  return(in_line(m, tok, line, ppos, pos, buf));
   
         /* If we're a nested call, same place. */          /* If we're a nested call, same place. */
         if (ppos > 1)          if ( ! nl)
                 return(in_line(m, tok, line, ppos, pos, buf));                  return(in_line(m, tok, line, ppos, pos, buf));
   
         /*          /*
Line 1505  obsolete(MACRO_PROT_ARGS)
Line 1536  obsolete(MACRO_PROT_ARGS)
  * macro is encountered.   * macro is encountered.
  */   */
 static int  static int
 phrase(struct mdoc *m, int line, int ppos, char *buf)  phrase(struct mdoc *m, int line, int ppos, char *buf,
                   enum margserr ac, int count)
 {  {
         int              la, pos;          int              la, pos;
         enum margserr    ac;          enum margserr    aac;
         enum mdoct       ntok;          enum mdoct       ntok;
         char            *p;          char            *p;
   
           assert(ARGS_PHRASE == ac ||
                           ARGS_PEND == ac ||
                           ARGS_PPHRASE == ac);
   
           if (count && ARGS_PPHRASE == ac)
                   return(mdoc_word_alloc(m, line, ppos, &buf[ppos]));
   
         for (pos = ppos; ; ) {          for (pos = ppos; ; ) {
                 la = pos;                  la = pos;
   
                 /* Note: no calling context! */                  /* Note: no calling context! */
                 ac = mdoc_zargs(m, line, &pos, buf, 0, &p);                  aac = mdoc_zargs(m, line, &pos, buf, 0, &p);
   
                 if (ARGS_ERROR == ac)                  if (ARGS_ERROR == aac)
                         return(0);                          return(0);
                 if (ARGS_EOLN == ac)                  if (ARGS_EOLN == aac)
                         break;                          break;
   
                 ntok = ARGS_QWORD == ac ? MDOC_MAX : lookup_raw(p);                  ntok = ARGS_QWORD == aac || ARGS_PEND == ac ?
                           MDOC_MAX : lookup_raw(p);
   
                 if (MDOC_MAX == ntok) {                  if (MDOC_MAX == ntok) {
                         if ( ! mdoc_word_alloc(m, line, la, p))                          if ( ! mdoc_word_alloc(m, line, la, p))
Legend:
Removed from v.1.57  
changed lines
  Added in v.1.61
CVSweb