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

Diff for /mandoc/roff.c between version 1.17 and 1.20

version 1.17, 2008/11/29 14:14:21 version 1.20, 2008/11/30 12:41:45
Line 38 
Line 38 
   
 /* FIXME: NAME section needs specific elements. */  /* FIXME: NAME section needs specific elements. */
   
   /* FIXME: don't print Os, just do roffbegin. */
   
 #define ROFF_MAXARG       32  #define ROFF_MAXARG       32
   
 enum    roffd {  enum    roffd {
Line 54  enum rofftype { 
Line 56  enum rofftype { 
   
 #define ROFFCALL_ARGS \  #define ROFFCALL_ARGS \
         int tok, struct rofftree *tree, \          int tok, struct rofftree *tree, \
         const char *argv[], enum roffd type          char *argv[], enum roffd type
   
 struct  rofftree;  struct  rofftree;
   
Line 129  static int    roffargs(const struct rofftree *,
Line 131  static int    roffargs(const struct rofftree *,
                                 int, char *, char **);                                  int, char *, char **);
 static  int               roffargok(int, int);  static  int               roffargok(int, int);
 static  int               roffnextopt(const struct rofftree *,  static  int               roffnextopt(const struct rofftree *,
                                 int, const char ***, char **);                                  int, char ***, char **);
 static  int               roffparse(struct rofftree *, char *);  static  int               roffparse(struct rofftree *, char *);
 static  int               textparse(const struct rofftree *, char *);  static  int               textparse(const struct rofftree *, char *);
   
Line 188  static const struct rofftok tokens[ROFF_MAX] = {
Line 190  static const struct rofftok tokens[ROFF_MAX] = {
         { roff_layout, roffarg_Bl, NULL, roffchild_Bl, 0, ROFF_LAYOUT, 0 }, /* Bl */          { roff_layout, roffarg_Bl, NULL, roffchild_Bl, 0, ROFF_LAYOUT, 0 }, /* Bl */
         {  roff_close, NULL, roffparent_El, NULL, ROFF_Bl, ROFF_LAYOUT, 0 }, /* El */          {  roff_close, NULL, roffparent_El, NULL, ROFF_Bl, ROFF_LAYOUT, 0 }, /* El */
         { roff_layout, NULL, roffparent_It, NULL, ROFF_It, ROFF_LAYOUT, ROFF_SHALLOW }, /* It */          { roff_layout, NULL, roffparent_It, NULL, ROFF_It, ROFF_LAYOUT, ROFF_SHALLOW }, /* It */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Ad */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Ad */ /* FIXME */
         {   roff_text, roffarg_An, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* An */          {   roff_text, roffarg_An, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* An */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Ar */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Ar */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_QUOTES }, /* Cd */ /* XXX man.4 only */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_QUOTES }, /* Cd */ /* XXX man.4 only */
Line 233  static const struct rofftok tokens[ROFF_MAX] = {
Line 235  static const struct rofftok tokens[ROFF_MAX] = {
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bc */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bc */
         {   NULL, NULL, NULL, NULL, 0, ROFF_TEXT, 0 },  /* Bf */ /* FIXME */          {   NULL, NULL, NULL, NULL, 0, ROFF_TEXT, 0 },  /* Bf */ /* FIXME */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bo */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bo */
         {   NULL, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bq */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED | ROFF_CALLABLE }, /* Bq */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* Bsx */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* Bsx */
         {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* Bx */          {   roff_text, NULL, NULL, NULL, 0, ROFF_TEXT, ROFF_PARSED }, /* Bx */
         {roff_special, NULL, NULL, NULL, 0, ROFF_SPECIAL, 0 },  /* Db */          {roff_special, NULL, NULL, NULL, 0, ROFF_SPECIAL, 0 },  /* Db */
Line 284  static const int tokenargs[ROFF_ARGMAX] = {
Line 286  static const int tokenargs[ROFF_ARGMAX] = {
         0,              ROFF_VALUE,     ROFF_VALUE,     0,          0,              ROFF_VALUE,     ROFF_VALUE,     0,
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,          0,              0,              0,              0,
           0,              0,              ROFF_VALUE,     0,
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,          0,              0,              0,              0,
Line 294  static const int tokenargs[ROFF_ARGMAX] = {
Line 297  static const int tokenargs[ROFF_ARGMAX] = {
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,          0,              0,              0,              0,
         0,              0,              0,              0,  
         };          };
   
 const   char *const toknamesp[ROFF_MAX] = {  const   char *const toknamesp[ROFF_MAX] = {
Line 385  roff_free(struct rofftree *tree, int flush)
Line 387  roff_free(struct rofftree *tree, int flush)
                         goto end;                          goto end;
         }          }
   
         if ( ! (*tree->cb.rofftail)(tree->arg))  
                 goto end;  
   
         error = 0;          error = 0;
   
 end:  end:
Line 417  roff_alloc(const struct roffcb *cb, void *args)
Line 416  roff_alloc(const struct roffcb *cb, void *args)
   
         (void)memcpy(&tree->cb, cb, sizeof(struct roffcb));          (void)memcpy(&tree->cb, cb, sizeof(struct roffcb));
   
         if ( ! (*tree->cb.roffhead)(args)) {  
                 free(tree);  
                 return(NULL);  
         }  
   
         return(tree);          return(tree);
 }  }
   
Line 522  roffparse(struct rofftree *tree, char *buf)
Line 516  roffparse(struct rofftree *tree, char *buf)
         int               tok, t;          int               tok, t;
         struct roffnode  *n;          struct roffnode  *n;
         char             *argv[ROFF_MAXARG];          char             *argv[ROFF_MAXARG];
         const char      **argvp;          char            **argvp;
   
         if (ROFF_MAX == (tok = rofffindtok(buf + 1))) {          if (ROFF_MAX == (tok = rofffindtok(buf + 1))) {
                 roff_err(tree, buf + 1, "bogus line macro");                  roff_err(tree, buf + 1, "bogus line macro");
Line 537  roffparse(struct rofftree *tree, char *buf)
Line 531  roffparse(struct rofftree *tree, char *buf)
         if ( ! roffargs(tree, tok, buf, argv))          if ( ! roffargs(tree, tok, buf, argv))
                 return(0);                  return(0);
   
         argvp = (const char **)argv;          argvp = (char **)argv;
   
         /*          /*
          * Prelude macros break some assumptions, so branch now.           * Prelude macros break some assumptions, so branch now.
Line 564  roffparse(struct rofftree *tree, char *buf)
Line 558  roffparse(struct rofftree *tree, char *buf)
         }          }
   
         if ( ! roffscan(tok, tokens[tree->last->tok].children)) {          if ( ! roffscan(tok, tokens[tree->last->tok].children)) {
                 roff_err(tree, *argvp, "`%s' is invalid child `%s'",                  roff_err(tree, *argvp, "`%s' is invalid child of `%s'",
                                 toknames[tree->last->tok],                                  toknames[tok],
                                 toknames[tok]);                                  toknames[tree->last->tok]);
                 return(0);                  return(0);
         }          }
   
Line 702  rofffindtok(const char *buf)
Line 696  rofffindtok(const char *buf)
 }  }
   
   
   #if notyet
 static int  static int
   roffispunct(const char *p)
   {
   
           if (0 == *p)
                   return(0);
           if (0 != *(p + 1))
                   return(0);
   
           switch (*p) {
           case('{'):
                   /* FALLTHROUGH */
           case('.'):
                   /* FALLTHROUGH */
           case(','):
                   /* FALLTHROUGH */
           case(';'):
                   /* FALLTHROUGH */
           case(':'):
                   /* FALLTHROUGH */
           case('?'):
                   /* FALLTHROUGH */
           case('!'):
                   /* FALLTHROUGH */
           case('('):
                   /* FALLTHROUGH */
           case(')'):
                   /* FALLTHROUGH */
           case('['):
                   /* FALLTHROUGH */
           case(']'):
                   /* FALLTHROUGH */
           case('}'):
                   return(1);
           default:
                   break;
           }
   
           return(0);
   }
   #endif
   
   
   static int
 rofffindcallable(const char *name)  rofffindcallable(const char *name)
 {  {
         int              c;          int              c;
Line 761  roffnode_free(struct rofftree *tree)
Line 799  roffnode_free(struct rofftree *tree)
   
 static int  static int
 roffnextopt(const struct rofftree *tree, int tok,  roffnextopt(const struct rofftree *tree, int tok,
                 const char ***in, char **val)                  char ***in, char **val)
 {  {
         const char      *arg, **argv;          char            *arg, **argv;
         int              v;          int              v;
   
         *val = NULL;          *val = NULL;
Line 870  roff_Os(ROFFCALL_ARGS)
Line 908  roff_Os(ROFFCALL_ARGS)
 {  {
   
         if (ROFF_EXIT == type) {          if (ROFF_EXIT == type) {
                 assert(ROFF_PRELUDE_Os & tree->state);                  roffnode_free(tree);
                 return(roff_layout(tok, tree, argv, type));                  return((*tree->cb.rofftail)(tree->arg));
         } else if (ROFF_BODY & tree->state) {          } else if (ROFF_BODY & tree->state) {
                 assert( ! (ROFF_PRELUDE & tree->state));                  assert( ! (ROFF_PRELUDE & tree->state));
                 assert(ROFF_PRELUDE_Os & tree->state);                  assert(ROFF_PRELUDE_Os & tree->state);
Line 893  roff_Os(ROFFCALL_ARGS)
Line 931  roff_Os(ROFFCALL_ARGS)
   
         assert(NULL == tree->last);          assert(NULL == tree->last);
   
         return(roff_layout(tok, tree, argv, type));          if (NULL == roffnode_new(tok, tree))
                   return(0);
   
           return((*tree->cb.roffhead)(tree->arg));
 }  }
   
   
Line 934  roff_layout(ROFFCALL_ARGS) 
Line 975  roff_layout(ROFFCALL_ARGS) 
         if (NULL == roffnode_new(tok, tree))          if (NULL == roffnode_new(tok, tree))
                 return(0);                  return(0);
   
           if ( ! (*tree->cb.roffblkin)(tree->arg, tok, argcp, argvp))
                   return(0);
   
           if (NULL == *argv)
                   return(1);
   
         if ( ! (*tree->cb.roffin)(tree->arg, tok, argcp, argvp))          if ( ! (*tree->cb.roffin)(tree->arg, tok, argcp, argvp))
                 return(0);                  return(0);
   
         if ( ! (ROFF_PARSED & tokens[tok].flags)) {          if ( ! (ROFF_PARSED & tokens[tok].flags)) {
                 while (*argv) {                  while (*argv) {
                         if ( ! (*tree->cb.roffdata)                          if ( ! (*tree->cb.roffdata)(tree->arg, *argv++))
                                         (tree->arg, *argv++))  
                                 return(0);                                  return(0);
                 }                  }
                   return((*tree->cb.roffout)(tree->arg, tok));
                 if ( ! ((*tree->cb.roffout)(tree->arg, tok)))  
                         return(0);  
                 return((*tree->cb.roffblkin)(tree->arg, tok));  
         }          }
   
         while (*argv) {          while (*argv) {
Line 967  roff_layout(ROFFCALL_ARGS) 
Line 1010  roff_layout(ROFFCALL_ARGS) 
                         return(0);                          return(0);
         }          }
   
         if ( ! ((*tree->cb.roffout)(tree->arg, tok)))          return((*tree->cb.roffout)(tree->arg, tok));
                 return(0);  
         return((*tree->cb.roffblkin)(tree->arg, tok));  
 }  }
   
   
Line 1014  roff_text(ROFFCALL_ARGS) 
Line 1055  roff_text(ROFFCALL_ARGS) 
         }          }
   
         while (*argv) {          while (*argv) {
                 if (ROFF_MAX != (c = rofffindcallable(*argv))) {                  if (ROFF_MAX == (c = rofffindcallable(*argv))) {
                         if (NULL == tokens[c].cb) {                          if ( ! (*tree->cb.roffdata)(tree->arg, *argv++))
                                 roff_err(tree, *argv, "unsupported "  
                                                 "macro `%s'",  
                                                 toknames[c]);  
                                 return(0);                                  return(0);
                         }                          continue;
                         if ( ! (*tokens[c].cb)(c, tree,  
                                                 argv, ROFF_ENTER))  
                                 return(0);  
                         break;  
                 }                  }
                 if ( ! (*tree->cb.roffdata)(tree->arg, *argv++))  
                   /*
                    * A sub-command has been found.  Execute it and
                    * discontinue parsing for arguments.
                    */
   
                   if (NULL == tokens[c].cb) {
                           roff_err(tree, *argv, "unsupported macro `%s'",
                                           toknames[c]);
                         return(0);                          return(0);
                   }
   
                   if ( ! (*tokens[c].cb)(c, tree, argv, ROFF_ENTER))
                           return(0);
   
                   break;
         }          }
   
         return((*tree->cb.roffout)(tree->arg, tok));          return((*tree->cb.roffout)(tree->arg, tok));
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.20
CVSweb