mandoc/mdoc_macro.c - diff

Return to mdoc_macro.c CVS log

Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/mdoc_macro.c between version 1.23 and 1.24

-version 1.23, 2009/07/19 09:17:42
+version 1.24, 2009/07/19 21:26:27
 Line 1385  obsolete(MACRO_PROT_ARGS)
 Line 1385  obsolete(MACRO_PROT_ARGS)
 Line 1385  obsolete(MACRO_PROT_ARGS)
  }
+ /*
+  * Phrases occur within `Bl -column' entries, separated by `Ta' or tabs.
+  * They're unusual because they're basically free-form text until a
+  * macro is encountered.
+  */
  static int
  phrase(struct mdoc *mdoc, int line, int ppos, char *buf)
  {
-         int              i, la, c, quoted;
+         int               c, w, la, pos;
+         char             *p;
-         /*
+         for (pos = ppos; ; ) {
-          * Parse over words in a phrase.  We have to handle this
+                 la = pos;
-          * specially because we assume no calling context -- in normal
-          * circumstances, we switch argument parsing based on whether
-          * the parent macro accepts quotes, tabs, etc.  Here, anything
-          * goes.
-          */
-         for (i = ppos; buf[i]; ) {
+                 /* Note: no calling context! */
-                 assert(' ' != buf[i]);
+                 w = mdoc_zargs(mdoc, line, &pos, buf, &p);
-                 la = i;
-                 quoted = 0;
-                 /*
+                 if (ARGS_ERROR == w)
-                  * Read to next token.  If quoted (check not escaped),
+                         return(0);
-                  * scan ahead to next unescaped quote.  If not quoted or
+                 if (ARGS_EOLN == w)
-                  * escape-quoted, then scan ahead to next space.
+                         break;
-                  */
-                 if ((i && '\"' == buf[i] && '\\' != buf[i - 1]) ||
+                 c = ARGS_QWORD == w ? MDOC_MAX :
-                                 (0 == i && '\"' == buf[i])) {
+                         mdoc_hash_find(mdoc->htab, p);
-                         for (la = ++i; buf[i]; i++)
-                                 if ('\"' != buf[i])
-                                         continue;
-                                 else if ('\\' != buf[i - 1])
-                                         break;
-                         if (0 == buf[i])
-                                 return(mdoc_perr(mdoc, line, la, EQUOTPHR));
-                         quoted = 1;
-                 } else
-                         for ( ; buf[i]; i++)
-                                 if (i && ' ' == buf[i]) {
-                                         if ('\\' != buf[i - 1])
-                                                 break;
-                                 } else if (' ' == buf[i])
-                                         break;
-                 /* If not end-of-line, terminate argument. */
+                 if (MDOC_MAX != c && -1 != c) {
+                         if ( ! mdoc_macro(mdoc, c, line, la, &pos, buf))
-                 if (buf[i])
-                         buf[i++] = 0;
-                 /* Read to next argument. */
-                 for ( ; buf[i] && ' ' == buf[i]; i++)
-                         /* Spin. */ ;
-                 /*
-                  * If we're a non-quoted string, try to look up the
-                  * value as a macro and execute it, if found.
-                  */
-                 c = quoted ? MDOC_MAX :
-                         mdoc_hash_find(mdoc->htab, &buf[la]);
-                 if (MDOC_MAX != c) {
-                         if ( ! mdoc_macro(mdoc, c, line, la, &i, buf))
                                  return(0);
-                         return(append_delims(mdoc, line, &i, buf));
+                         return(append_delims(mdoc, line, &pos, buf));
-                 }
+                 } else if (-1 == c)
+                         return(0);
-                 /* A regular word or quoted string. */
+                 if ( ! mdoc_word_alloc(mdoc, line, la, p))
-                 if ( ! mdoc_word_alloc(mdoc, line, la, &buf[la]))
                          return(0);
                  mdoc->next = MDOC_NEXT_SIBLING;
          }
          return(1);
  }

CVSweb